emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/valign 62bfe1a 026/198: Minor change


From: Stefan Monnier
Subject: [elpa] externals/valign 62bfe1a 026/198: Minor change
Date: Tue, 1 Dec 2020 18:19:09 -0500 (EST)

branch: externals/valign
commit 62bfe1a874a1391412b1cc75b8efd91a97f4d6e0
Author: Yuan Fu <casouri@gmail.com>
Commit: Yuan Fu <casouri@gmail.com>

    Minor change
    
    * valign.el (valign-org-mode-hook, valign-org-agenda-finalize-hook):
    Rename.
    (valign--org-mode-hook, valign--org-agenda-finalize-hook): New
    function.
    (valign-mode): Reflect the name change.
---
 valign.el | 22 ++++++++++------------
 1 file changed, 10 insertions(+), 12 deletions(-)

diff --git a/valign.el b/valign.el
index dd05e0b..ea8cd44 100644
--- a/valign.el
+++ b/valign.el
@@ -450,15 +450,13 @@ for the former, and 'multi-column for the latter."
     (valign-bad-cell (message (error-message-string err)))
     (valign-werid-alignment (message (error-message-string err)))))
 
-(defun valign-org-mode-hook ()
-  "Valign hook function use by `org-mode'."
-  (add-hook 'jit-lock-functions
-            #'valign-initial-alignment 90 t))
+(defun valign--org-mode-hook ()
+  "Valign hook function used by `org-mode'."
+  (add-hook 'jit-lock-functions #'valign-initial-alignment 90 t))
 
-(defun valign-org-agenda-finalize-hook ()
-  "Valign hook function use by `org-agenda-finalize-hook'."
-  (valign-initial-alignment
-   (point-min) (point-max) t))
+(defun valign--org-agenda-finalize-hook ()
+  "Valign hook function used by `org-agenda-finalize-hook'."
+  (valign-initial-alignment (point-min) (point-max) t))
 
 (define-minor-mode valign-mode
   "valign minor mode."
@@ -468,12 +466,12 @@ for the former, and 'multi-column for the latter."
   :lighter valign-lighter
   (if (and valign-mode window-system)
       (progn
-        (add-hook 'org-mode-hook #'valign-org-mode-hook)
-        (add-hook 'org-agenda-finalize-hook #'valign-org-agenda-finalize-hook)
+        (add-hook 'org-mode-hook #'valign--org-mode-hook)
+        (add-hook 'org-agenda-finalize-hook #'valign--org-agenda-finalize-hook)
         (advice-add 'org-table-next-field :after #'valign-table)
         (advice-add 'org-table-previous-field :after #'valign-table))
-    (remove-hook 'org-mode-hook #'valign-org-mode-hook)
-    (remove-hook 'org-agenda-finalize-hook #'valign-org-agenda-finalize-hook)
+    (remove-hook 'org-mode-hook #'valign--org-mode-hook)
+    (remove-hook 'org-agenda-finalize-hook #'valign--org-agenda-finalize-hook)
     (advice-remove 'org-table-next-field #'valign-table)
     (advice-remove 'org-table-previous-field #'valign-table)))
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]