Commit dicipline fail

users/crumb/programs/emacs/lib/syd-prose.el

@@ -0,0 +1,27 @@
+;;; syd-prose.el -*- lexical-binding: t; -*-
+
+(use-package visual-fill-column
+  :defer t)
+
+(defun syd-prose-disable-display-line-numbers-mode-h ()
+  "Disable `display-line-numbers-mode'."
+  (display-line-numbers-mode -1))
+
+(defun syd-prose-set-visual-fill-column-center ()
+  "Sets the buffer-local value for `visual-fill-column-center-text'."
+  (setq-local visual-fill-column-center-text t))
+
+(defvar syd-prose-mode-hook
+  (list #'syd-prose-set-visual-fill-column-center
+        #'visual-fill-column-mode
+        #'visual-line-mode
+        #'variable-pitch-mode
+        #'syd-prose-disable-display-line-numbers-mode-h)
+  "Hooks run for `syd-prose-mode'.")
+
+;;;###autoload
+(define-minor-mode syd-prose-mode
+  "A minor mode for writing prose."
+  :lighter nil)
+
+(provide 'syd-prose)