diff options
| author | Case Duckworth | 2022-01-31 17:27:21 -0600 |
|---|---|---|
| committer | Case Duckworth | 2022-01-31 17:27:39 -0600 |
| commit | 7ffde2d9bb9165281be249f56d5b363447239ab7 (patch) | |
| tree | e187a074dde1f4db39bd4b5a4ea18a809a0706ee /lisp | |
| parent | Add flyspell to vertico-multiform-categories (diff) | |
| download | emacs-7ffde2d9bb9165281be249f56d5b363447239ab7.tar.gz emacs-7ffde2d9bb9165281be249f56d5b363447239ab7.zip | |
Changes
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 |