[PATCH 0/1] emacs: hello: bugfix for saved searches defcustom

Mark Walters markwalters1009 at gmail.com
Wed Apr 16 14:21:52 PDT 2014


This is almost the same as                                                                            id:1397627927-9692-1-git-send-email-markwalters1009 at gmail.com but with                                a commit message a couple of function renames and a couple of                                         spelling/typo mistakes fixed (pointed out by Tomi)                                                    

The diff from the WIP version is:

diff --git a/emacs/notmuch-hello.el b/emacs/notmuch-hello.el
index 27eac72..a7a8e20 100644
--- a/emacs/notmuch-hello.el
+++ b/emacs/notmuch-hello.el
@@ -56,7 +56,7 @@ lists (NAME QUERY COUNT-QUERY)."
   "Return a copy of SAVED-SEARCH in plist form.
 
 If saved search is a plist then just return a copy. In other
-cases, for backwards compatability, convert to plist form and
+cases, for backwards compatibility, convert to plist form and
 return that."
   (if (keywordp (car saved-search))
       (copy-seq saved-search)
@@ -67,11 +67,11 @@ return that."
 	  (when string
 	    (setq plist-search (append plist-search (list field string)))))))))
 
-(defun notmuch--saved-searches-to-plist (symbol)
+(defun notmuch-hello--saved-searches-to-plist (symbol)
   "Extract a saved-search variable into plist form.
 
 The new style saved search is just a plist, but for backwards
-compatatibility we use this function to extract old style saved
+compatibility we use this function to extract old style saved
 searches so they still work in customize."
   (let ((saved-searches (default-value symbol)))
     (mapcar #'notmuch-hello-saved-search-to-plist saved-searches)))
@@ -114,7 +114,7 @@ or a list of the form (NAME QUERY COUNT-QUERY)."
 ;; section. This section generates its own saved-search list in one of
 ;; the latter two forms.
 
-  :get 'notmuch--saved-searches-to-plist
+  :get 'notmuch-hello--saved-searches-to-plist
   :type '(repeat notmuch-saved-search-plist)
   :tag "List of Saved Searches"
   :group 'notmuch-hello)


Mark Walters (1):
  emacs: hello: bugfix for saved searches defcustom

 emacs/notmuch-hello.el |  128 ++++++++++++++++++++++++++++++++++--------------
 emacs/notmuch-lib.el   |   52 --------------------
 2 files changed, 90 insertions(+), 90 deletions(-)

-- 
1.7.10.4



More information about the notmuch mailing list