diff options
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/+modeline.el | 6 | ||||
-rw-r--r-- | lisp/+org.el | 2 | ||||
-rw-r--r-- | lisp/+scratch.el | 3 |
3 files changed, 5 insertions, 6 deletions
diff --git a/lisp/+modeline.el b/lisp/+modeline.el index 300787a..9ebeb83 100644 --- a/lisp/+modeline.el +++ b/lisp/+modeline.el | |||
@@ -224,9 +224,9 @@ The order of elements matters: whichever one matches first is applied." | |||
224 | (:propertize (line-number-mode | 224 | (:propertize (line-number-mode |
225 | ((column-number-mode | 225 | ((column-number-mode |
226 | (column-number-indicator-zero-based | 226 | (column-number-indicator-zero-based |
227 | ,(concat before "%3l" sep "%2c" after) | 227 | ,(concat before "%2l" sep "%2c" after) |
228 | ,(concat before "%3l" sep "%2C" after)) | 228 | ,(concat before "%2l" sep "%2C" after)) |
229 | ,(concat before "%3l" sep "" after))) | 229 | ,(concat before "%2l" sep "" after))) |
230 | ((column-number-mode | 230 | ((column-number-mode |
231 | (column-number-indicator-zero-based | 231 | (column-number-indicator-zero-based |
232 | ,(concat before sep "%2c" after) | 232 | ,(concat before sep "%2c" after) |
diff --git a/lisp/+org.el b/lisp/+org.el index 5062a08..06e70e4 100644 --- a/lisp/+org.el +++ b/lisp/+org.el | |||
@@ -269,7 +269,7 @@ instead of the true count." | |||
269 | (region-end)))) | 269 | (region-end)))) |
270 | (org-link (when clipboard-url | 270 | (org-link (when clipboard-url |
271 | (org-link-make-string | 271 | (org-link-make-string |
272 | clipboard-url | 272 | (string-trim clipboard-url) |
273 | (or region-content | 273 | (or region-content |
274 | (read-string "title: " | 274 | (read-string "title: " |
275 | (with-current-buffer | 275 | (with-current-buffer |
diff --git a/lisp/+scratch.el b/lisp/+scratch.el index 2a89a95..b724a94 100644 --- a/lisp/+scratch.el +++ b/lisp/+scratch.el | |||
@@ -5,7 +5,7 @@ | |||
5 | ;;(require 'scratch) | 5 | ;;(require 'scratch) |
6 | 6 | ||
7 | (defun +scratch-immortal () | 7 | (defun +scratch-immortal () |
8 | "Bury, don't kill \"*scratc*\" buffer. | 8 | "Bury, don't kill \"*scratch*\" buffer. |
9 | For `kill-buffer-query-functions'." | 9 | For `kill-buffer-query-functions'." |
10 | (if (eq (current-buffer) (get-buffer "*scratch*")) | 10 | (if (eq (current-buffer) (get-buffer "*scratch*")) |
11 | (progn (bury-buffer) | 11 | (progn (bury-buffer) |
@@ -24,6 +24,5 @@ For `kill-buffer-query-functions'." | |||
24 | (next-line 2)) | 24 | (next-line 2)) |
25 | (rename-buffer (concat "*scratch<" mode ">*") t))) | 25 | (rename-buffer (concat "*scratch<" mode ">*") t))) |
26 | 26 | ||
27 | |||
28 | (provide '+scratch) | 27 | (provide '+scratch) |
29 | ;;; +scratch.el ends here | 28 | ;;; +scratch.el ends here |