emacs-diffs
[Top][All Lists]
Advanced

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

[Emacs-diffs] master 14508ea 1/2: Clean up custom-buffer-create code sli


From: Lars Ingebrigtsen
Subject: [Emacs-diffs] master 14508ea 1/2: Clean up custom-buffer-create code slightly
Date: Thu, 28 Apr 2016 13:24:26 +0000

branch: master
commit 14508eaa3c0a97e305e8eebae5ce55787eec1e4a
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    Clean up custom-buffer-create code slightly
    
    * lisp/cus-edit.el (custom-buffer-create-other-window): Don't
    pass the unused description value on (for clarity) (bug#10540).
    (custom-buffer-create): Ditto
---
 lisp/cus-edit.el |   16 +++++++++-------
 1 file changed, 9 insertions(+), 7 deletions(-)

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index addff82..cf98b60 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -1543,27 +1543,29 @@ not for everybody."
        buf))))
 
 ;;;###autoload
-(defun custom-buffer-create (options &optional name description)
+(defun custom-buffer-create (options &optional name _description)
   "Create a buffer containing OPTIONS.
 Optional NAME is the name of the buffer.
 OPTIONS should be an alist of the form ((SYMBOL WIDGET)...), where
 SYMBOL is a customization option, and WIDGET is a widget for editing
 that option.
-DESCRIPTION is unused."
-  (pop-to-buffer-same-window (custom-get-fresh-buffer (or name 
"*Customization*")))
-  (custom-buffer-create-internal options description))
+_DESCRIPTION is unused."
+  (pop-to-buffer-same-window
+   (custom-get-fresh-buffer (or name "*Customization*")))
+  (custom-buffer-create-internal options))
 
 ;;;###autoload
-(defun custom-buffer-create-other-window (options &optional name description)
+(defun custom-buffer-create-other-window (options &optional name _description)
   "Create a buffer containing OPTIONS, and display it in another window.
 The result includes selecting that window.
 Optional NAME is the name of the buffer.
 OPTIONS should be an alist of the form ((SYMBOL WIDGET)...), where
 SYMBOL is a customization option, and WIDGET is a widget for editing
-that option."
+that option.
+_DESCRIPTION is unused."
   (unless name (setq name "*Customization*"))
   (switch-to-buffer-other-window (custom-get-fresh-buffer name))
-  (custom-buffer-create-internal options description))
+  (custom-buffer-create-internal options))
 
 (defcustom custom-reset-button-menu t
   "If non-nil, only show a single reset button in customize buffers.



reply via email to

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