X-Git-Url: https://iankelling.org/git/?p=dot-emacs;a=blobdiff_plain;f=my-init.org;h=b854dbe01a2f6d1bf79f086a8584dd4bc3eb0600;hp=6d698da5440469124630f21b0a2d84f2b2c0db80;hb=59c6116b487a71eab5f6ac547ddc8ff298ad244d;hpb=4d60a06fd8f3524e1b48f729be314bea09652713 diff --git a/my-init.org b/my-init.org index 6d698da..b854dbe 100644 --- a/my-init.org +++ b/my-init.org @@ -2332,6 +2332,9 @@ unchecked some stuff so that it inherits from default. #+begin_src emacs-lisp + + + (defun next-backup-dir () "In a directory listing from rsync -n, Go to the next directory based on where the cursor is." @@ -8399,6 +8402,31 @@ text-scale-reset :PROPERTIES: :CUSTOM_ID: 0e7f83a5-600e-4016-af98-95904300c016 :END: +insert-apache +[ +#+begin_src emacs-lisp +(defun insert-apache () + (interactive) + (beginning-of-line) + (let ((beg (point))) + (insert "Copyright (C) 2016 Ian Kelling\n") + (insert "\n") + (insert "Licensed under the Apache License, Version 2.0 (the \"License\");\n") + (insert "you may not use this file except in compliance with the License.\n") + (insert "You may obtain a copy of the License at\n") + (insert "\n") + (insert " http://www.apache.org/licenses/LICENSE-2.0\n") + (insert "\n") + (insert "Unless required by applicable law or agreed to in writing, software\n") + (insert "distributed under the License is distributed on an \"AS IS\" BASIS,\n") + (insert "WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.\n") + (insert "See the License for the specific language governing permissions and\n") + (insert "limitations under the License.\n") + (comment-region beg (point)))) +(global-set-key (kbd "C-M-0") 'insert-apache) +#+end_src +] + *** C-S-0 :PROPERTIES: :CUSTOM_ID: d1706bc7-7cf0-4b49-87d0-15bf76eaca5f