diff options
author | Case Duckworth | 2021-01-13 20:19:36 -0600 |
---|---|---|
committer | Case Duckworth | 2021-01-13 20:19:36 -0600 |
commit | 9282845d6c82d028dd711ee2077ec6bda1af63d3 (patch) | |
tree | 56b754c4807ff83f5a827ade00d937b54b0a8e1c | |
parent | Add TODO for local variables (diff) | |
download | emacs-9282845d6c82d028dd711ee2077ec6bda1af63d3.tar.gz emacs-9282845d6c82d028dd711ee2077ec6bda1af63d3.zip |
Fix bugs for compilation
-rw-r--r-- | config.org | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/config.org b/config.org index a7e2f3f..d430220 100644 --- a/config.org +++ b/config.org | |||
@@ -101,7 +101,7 @@ | |||
101 | *** Emulate use-package’s =:custom= | 101 | *** Emulate use-package’s =:custom= |
102 | 102 | ||
103 | #+begin_src emacs-lisp | 103 | #+begin_src emacs-lisp |
104 | (defmacro cuss (var val &optional docstring) | 104 | (defmacro cuss (var val &optional _docstring) |
105 | "Basically, `:custom' from `use-package', but without `use-package'." | 105 | "Basically, `:custom' from `use-package', but without `use-package'." |
106 | (declare (doc-string 3) | 106 | (declare (doc-string 3) |
107 | (indent 2)) | 107 | (indent 2)) |
@@ -468,7 +468,7 @@ | |||
468 | (: (any ?a ?A ?p ?P) (any ?m ?M))) | 468 | (: (any ?a ?A ?p ?P) (any ?m ?M))) |
469 | (* nonl))) | 469 | (* nonl))) |
470 | (ss (sunrise-sunset)) | 470 | (ss (sunrise-sunset)) |
471 | (m_ (string-match times-regex ss)) | 471 | (_m (string-match times-regex ss)) |
472 | (sunrise-time (match-string 1 ss)) | 472 | (sunrise-time (match-string 1 ss)) |
473 | (sunset-time (match-string 2 ss))) | 473 | (sunset-time (match-string 2 ss))) |
474 | (run-at-time sunrise-time (* 60 60 24) sunrise-command) | 474 | (run-at-time sunrise-time (* 60 60 24) sunrise-command) |
@@ -906,9 +906,7 @@ from [[https://github.com/mpereira/.emacs.d#make-cursor-movement-an-order-of-mag | |||
906 | (set-keyboard-coding-system 'utf-8) | 906 | (set-keyboard-coding-system 'utf-8) |
907 | ;; backwards compatibility: | 907 | ;; backwards compatibility: |
908 | ;; `default-buffer-file-coding-system' is deprecated in 23.2. | 908 | ;; `default-buffer-file-coding-system' is deprecated in 23.2. |
909 | (if (boundp 'buffer-file-coding-system) | 909 | (setq default-buffer-file-coding-system 'utf-8) |
910 | (setq-default buffer-file-coding-system 'utf-8) | ||
911 | (setq default-buffer-file-coding-system 'utf-8)) | ||
912 | 910 | ||
913 | ;; Treat clipboard as UTF-8 string first; compound text next, etc. | 911 | ;; Treat clipboard as UTF-8 string first; compound text next, etc. |
914 | (setq x-select-request-type '(UTF8_STRING COMPOUND_TEXT TEXT STRING)) | 912 | (setq x-select-request-type '(UTF8_STRING COMPOUND_TEXT TEXT STRING)) |
@@ -1003,7 +1001,7 @@ from [[https://github.com/mpereira/.emacs.d#make-cursor-movement-an-order-of-mag | |||
1003 | (straight-use-package 'sudo-edit) | 1001 | (straight-use-package 'sudo-edit) |
1004 | 1002 | ||
1005 | (with-eval-after-load 'sudo-edit | 1003 | (with-eval-after-load 'sudo-edit |
1006 | (global-set-key acdw/map (kbd "C-r") #'sudo-edit)) | 1004 | (define-key acdw/map (kbd "C-r") #'sudo-edit)) |
1007 | #+end_src | 1005 | #+end_src |
1008 | 1006 | ||
1009 | **** Don’t add =/sudo:= files to =recentf=, though | 1007 | **** Don’t add =/sudo:= files to =recentf=, though |