emacs: Get rid of set-fill-width

2 files changed, 4 insertions, 3 deletions

diff --git a/emacs/.config/emacs/arkta/arkta-progmodes.el b/emacs/.config/emacs/arkta/arkta-progmodes.el
index eddc4aa..33ae15e 100644
--- a/emacs/.config/emacs/arkta/arkta-progmodes.el
+++ b/emacs/.config/emacs/arkta/arkta-progmodes.el
@@ -185,7 +185,7 @@
   :mode "\\.[0-9]p?\\'"
   :init
   (defun arkta/nroff-setup ()
-    (set-fill-width 80))
+    (setq fill-column 80))
   :hook (nroff-mode . arkta/nroff-setup))
 
 (use-package nxml-mode
diff --git a/emacs/.config/emacs/init.el b/emacs/.config/emacs/init.el
index 66b50f3..fdff907 100644
--- a/emacs/.config/emacs/init.el
+++ b/emacs/.config/emacs/init.el
@@ -215,13 +215,11 @@
              ,@(mapcar (lambda (name) `(setq-default ,name value)) emacs-names))
          ,@(mapcar (lambda (name) `(setq ,name value)) emacs-names)))))
 
-(defsetter fill-width fill-column)
 (defsetter tab-usage indent-tabs-mode)
 (defsetter tab-width c-basic-offset nasm-offset standard-indent tab-width)
 
 ;; Miscellany
 
-(set-fill-width 120 t)
 (set-tab-usage nil t)
 (set-tab-width 4 t)
 
@@ -327,6 +325,9 @@
   :commands (elpher)
   :custom (elpher-default-url-type "gemini"))
 
+(use-package emacs
+  :custom (fill-column 120))
+
 (use-package envrc
   :when nil
   :straight t