summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorCase Duckworth2021-08-30 22:18:45 -0500
committerCase Duckworth2021-08-30 22:18:45 -0500
commite43b996df685e5031367976bd76bfc660880c981 (patch)
treefc5c76be551ab24eda77926d927a2ab3959fd1e9
parentAdd `affe' (diff)
downloademacs-e43b996df685e5031367976bd76bfc660880c981.tar.gz
emacs-e43b996df685e5031367976bd76bfc660880c981.zip
Reorganize
-rw-r--r--init.el47
1 files changed, 25 insertions, 22 deletions
diff --git a/init.el b/init.el index acdea0c..0bc68be 100644 --- a/init.el +++ b/init.el
@@ -1745,8 +1745,8 @@ successive invocations."
1745 1745
1746(setup (:straight persistent-scratch) 1746(setup (:straight persistent-scratch)
1747 (:option persistent-scratch-backup-directory (acdw/dir "scratch" t) 1747 (:option persistent-scratch-backup-directory (acdw/dir "scratch" t)
1748 persistent-scratch-keep-n-newest-backups 12)) 1748 persistent-scratch-keep-n-newest-backups 12)
1749(persistent-scratch-setup-default)) 1749 (persistent-scratch-setup-default))
1750 1750
1751(setup (:straight restart-emacs) 1751(setup (:straight restart-emacs)
1752 (defun emacs-upgrade (&optional update-packages) 1752 (defun emacs-upgrade (&optional update-packages)
@@ -1835,24 +1835,7 @@ successive invocations."
1835 (:hook-into prog-mode)) 1835 (:hook-into prog-mode))
1836 1836
1837(setup (:straight typo) 1837(setup (:straight typo)
1838 1838
1839 ;; jlf & cvandusen on #emacs make a great point: ’ (RIGHT SINGLE QUOTATION
1840 ;; MARK) is /not/ an apostrophe. Making it curly is a typographical
1841 ;; consideration, not an input consideration. (I suppose you could make the
1842 ;; argument that all of these are typographical considerations, but .. bleh.)
1843 (define-typo-cycle typo-cycle-apostrophe
1844 "Cycle through apostrophe-like graphemes.
1845If used with a numeric prefix argument N, N apostrophes will be inserted."
1846 ("'" "′" "″" "’"))
1847
1848 (define-typo-cycle typo-cycle-backtick
1849 "Cycle through backtick and left single quotation mark.
1850If used with a numeric prefix argument N, N backticks will be inserted."
1851 ("`" "‘"))
1852
1853 (:bind "'" typo-cycle-apostrophe
1854 "`" typo-cycle-backtick)
1855
1856 ;; Enable C-c 8 map in all buffers 1839 ;; Enable C-c 8 map in all buffers
1857 (typo-global-mode +1) 1840 (typo-global-mode +1)
1858 1841
@@ -1863,10 +1846,30 @@ If used with a numeric prefix argument N, N backticks will be inserted."
1863 ;; `typo-disable-electricity-functions' because the latter checks 1846 ;; `typo-disable-electricity-functions' because the latter checks
1864 ;; on every pertinent keypress. I know I want /no/ typo-ing in 1847 ;; on every pertinent keypress. I know I want /no/ typo-ing in
1865 ;; these certain buffers, so I won't even turn on the mode. 1848 ;; these certain buffers, so I won't even turn on the mode.
1866 (unless (or ; predicates here 1849 (unless (or ; predicates here
1867 (string-match-p "COMMIT_EDITMSG" 1850 (string-match-p "COMMIT_EDITMSG"
1868 (or (buffer-name) ""))) 1851 (or (buffer-name) "")))
1869 (typo-mode +1))))) 1852 (typo-mode +1))))
1853
1854 (with-eval-after-load 'typo
1855 ;; jlf & cvandusen on #emacs make a great point: ’ (RIGHT SINGLE QUOTATION
1856 ;; MARK) is /not/ an apostrophe. Making it curly is a typographical
1857 ;; consideration, not an input consideration. (I suppose you could make
1858 ;; the argument that all of these are typographical considerations, but
1859 ;; .. bleh.)
1860 (define-typo-cycle typo-cycle-apostrophe
1861 "Cycle through apostrophe-like graphemes.
1862If used with a numeric prefix argument N, N apostrophes will be inserted."
1863 ("'" "′" "″" "’"))
1864
1865 (define-typo-cycle typo-cycle-backtick
1866 "Cycle through backtick and left single quotation mark.
1867If used with a numeric prefix argument N, N backticks will be inserted."
1868 ("`" "‘"))
1869
1870 (:bind "'" typo-cycle-apostrophe
1871 "`" typo-cycle-backtick)
1872 ))
1870 1873
1871(setup (:straight undo-fu) 1874(setup (:straight undo-fu)
1872 (:global "C-/" undo-fu-only-undo 1875 (:global "C-/" undo-fu-only-undo