提交: 3e7ae8bd66dbcb97201874b55377505df2294b0b - emacs-files (hg)

Commit MetaInfo

• 修訂: 3e7ae8bd66dbcb97201874b55377505df2294b0b (tree)
• 時間: 2023-05-03 20:24:42
• 作者: badcoff33
• Commiter: badcoff33

Log Message

prefer toggle-truncate-lines instead var truncate-lines

Change Summary

• modified: init.el

差異

diff -r 196a7be34820 -r 3e7ae8bd66db init.el
--- a/init.el	Fri Apr 28 20:18:12 2023 +0200
+++ b/init.el	Wed May 03 13:24:42 2023 +0200
@@ -251,17 +251,19 @@
 (add-hook 'markdown-mode-hook
           (lambda ()
             (+skeletons-for-markdown)
-            (setq truncate-lines nil)
+            (toggle-truncate-lines 1)
+            (setq-local face-remapping-alist
+                        '((markdown-header-face (:height 4.0) markdown-header-face)))
             (let* ((pandoc-command "pandoc -f gfm -t html5 --toc --toc-depth=2")
                    (css-file (concat user-emacs-directory "html-files/pandoc_simple.css"))
                    (html-file (concat user-emacs-directory "html-files/pandoc_template.html")))
-              (setq markdown-command (concat pandoc-command
-                                             " --metadata title=" (file-name-sans-extension
-                                                                   (file-name-nondirectory buffer-file-name))
-                                             (when (and (file-exists-p css-file)
-                                                        (file-exists-p html-file))
-                                               (concat " --css=" css-file " --template=" html-file)))))
-            (local-set-key (kbd "C-c a") 'rst-adjust-adornment)))
+              (setq markdown-command-needs-filename t
+                    markdown-command
+                    (concat pandoc-command
+                            " --metadata title=" (file-name-sans-extension
+                                                  (file-name-nondirectory buffer-file-name))
+                            (if (file-exists-p css-file) (concat " --css=" css-file) "")
+                            (if (file-exists-p html-file) (concat " --template=" html-file)))))))
 
 (add-hook 'eshell-mode-hook
           (lambda ()
@@ -294,7 +296,7 @@
           (lambda ()
             (eldoc-mode 1)
             (indent-tabs-mode -1)
-            (setq truncate-lines t)
+            (toggle-truncate-lines 1)
             (prettify-symbols-mode 1)
             (setq hippie-expand-try-functions-list
                   '(try-expand-dabbrev
@@ -343,6 +345,7 @@
 (add-hook 'c-mode-common-hook
           (lambda ()
             (local-set-key (kbd "C-c f") #'clang-format-buffer)
+            (local-set-key (kbd "C-c i") #'imenu)
             (local-set-key (kbd "C-c g")
                            (lambda ()
                              (interactive)
@@ -357,7 +360,7 @@
             (push '("!=" . ?≠) prettify-symbols-alist)
             (push '("->" . ?→) prettify-symbols-alist)
             (prettify-symbols-mode 1)
-            (setq truncate-lines t)
+            (toggle-truncate-lines 1)
             (+skeletons-for-c)
             (cwarn-mode 1)
             (indent-tabs-mode -1)