Add experimental (commented) :after advice for do-auto-fill

1 files changed, 14 insertions, 2 deletions

@@ -328,8 +328,7 @@
    erc-button-url-regexp browse-url-button-regexp
    erc-common-server-suffixes '(("tilde.chat\\'" . "~")
                                 ("libera.chat\\'" . "LC"))
-   erc-default-server "irc.tilde.chat"  ; fuck freenode. all my friends hate
-                                        ; freenode.
+   erc-default-server "irc.tilde.chat"
    erc-fill-function #'erc-fill-static
    erc-fill-static-center 14
    erc-format-nick-function #'erc-format-truncate-@nick
@@ -709,6 +708,19 @@ like a dumbass."
   (add-hook 'prog-mode-hook
             (defun prog-mode@auto-fill ()
               (setq-local comment-auto-fill-only-comments t)
+              ;; (advice-add 'do-auto-fill :after
+              ;;             (defun auto-fill@set-comment-column (&rest _)
+              ;;               (save-excursion
+              ;;                 (when (or (looking-back comment-start-skip)
+              ;;                           (progn (backward-word)
+              ;;                                  (looking-back
+              ;;                                   comment-start-skip)))
+              ;;                   (comment-set-column t)))))
+              ;; If the above advice is enabled, the below advice also needs to
+              ;; be set to make `comment-dwim' work... I think.
+              ;; (advice-add 'comment-dwim :before
+              ;;             (defun comment-dwim@set-comment-column (&rest _)
+              ;;               (setq comment-column 0)))
               (turn-on-auto-fill)))
 
   (:option show-paren-delay 0