diff options
author | Case Duckworth | 2021-10-07 18:37:14 -0500 |
---|---|---|
committer | Case Duckworth | 2021-10-07 18:37:14 -0500 |
commit | cd9cc5321589b378a836830c21159e5ed1729453 (patch) | |
tree | 305e6ef01ef8cfb881f18ea8521fd1623a4f9799 | |
parent | Fix acdw/define-auto-insert (diff) | |
download | emacs-cd9cc5321589b378a836830c21159e5ed1729453.tar.gz emacs-cd9cc5321589b378a836830c21159e5ed1729453.zip |
Tweak auto-insert thing
-rw-r--r-- | init.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/init.el b/init.el index d3ad238..fa6e456 100644 --- a/init.el +++ b/init.el | |||
@@ -104,11 +104,11 @@ | |||
104 | '("Short description: " ";;; " | 104 | '("Short description: " ";;; " |
105 | (file-name-nondirectory (buffer-file-name)) | 105 | (file-name-nondirectory (buffer-file-name)) |
106 | " --- " str | 106 | " --- " str |
107 | (make-string (max 2 ( - 80 (current-column) 27)) 32) | 107 | (make-string (max 2 ( - fill-column (current-column) 27)) 32) |
108 | "-*- lexical-binding: t; -*-" | 108 | "-*- lexical-binding: t; -*-" |
109 | '(setq lexical-binding t) | 109 | '(setq lexical-binding t) |
110 | "\n\n;; Copyright (C) " (format-time-string "%Y") | 110 | "\n\n;; Copyright (C) " (format-time-string "%Y") |
111 | " " (getenv "ORGANIZATION") | (progn user-full-name) | 111 | " " (getenv "ORGANIZATION") | (progn user-full-name) |
112 | "\n\n;; Author: " (user-full-name) | 112 | "\n\n;; Author: " (user-full-name) |
113 | '(if (search-backward "&" (line-beginning-position) t) | 113 | '(if (search-backward "&" (line-beginning-position) t) |
114 | (replace-match (capitalize (user-login-name)) t t)) | 114 | (replace-match (capitalize (user-login-name)) t t)) |