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

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

[elpa] externals/taxy 827462f 1/2: Example: (deffy) Rename bookmark func


From: ELPA Syncer
Subject: [elpa] externals/taxy 827462f 1/2: Example: (deffy) Rename bookmark functions
Date: Wed, 22 Sep 2021 23:57:22 -0400 (EDT)

branch: externals/taxy
commit 827462f9dbe00fcd5295c42120fd0bd9e8561d82
Author: Adam Porter <adam@alphapapa.net>
Commit: Adam Porter <adam@alphapapa.net>

    Example: (deffy) Rename bookmark functions
    
    They're not really internal.
---
 examples/deffy.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/examples/deffy.el b/examples/deffy.el
index 4677327..70cfefe 100644
--- a/examples/deffy.el
+++ b/examples/deffy.el
@@ -289,7 +289,7 @@ prefix, from all `deffy-mode' buffers."
 
 (define-derived-mode deffy-mode magit-section-mode "Deffy"
   :global nil
-  (setq-local bookmark-make-record-function #'deffy--bookmark-make-record
+  (setq-local bookmark-make-record-function #'deffy-bookmark-make-record
              revert-buffer-function #'deffy-revert))
 
 ;;;; Functions
@@ -389,15 +389,15 @@ prefix, from all `deffy-mode' buffers."
 
 (defvar bookmark-make-record-function)
 
-(defun deffy--bookmark-make-record ()
+(defun deffy-bookmark-make-record ()
   "Return a bookmark record for current Deffy buffer."
   (list (concat "Deffy: %s" deffy-directory)
        (cons 'directory deffy-directory)
        (cons 'files deffy-files)
-       (cons 'handler #'deffy--bookmark-handler)))
+       (cons 'handler #'deffy-bookmark-handler)))
 
 ;;;###autoload
-(defun deffy--bookmark-handler (record)
+(defun deffy-bookmark-handler (record)
   "Show Deffy buffer for bookmark RECORD."
   (pcase-let* ((`(,_ . ,(map directory files)) record))
     (deffy :files files :project (project-current nil directory))



reply via email to

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