]> git.eshelyaron.com Git - emacs.git/commitdiff
; Clean up parameter input for nnselect groups
authorAndrew G Cohen <cohen@andy.bu.edu>
Mon, 24 Apr 2017 02:53:07 +0000 (10:53 +0800)
committerAndrew G Cohen <cohen@andy.bu.edu>
Mon, 24 Apr 2017 02:53:07 +0000 (10:53 +0800)
* lisp/gnus/nnselect.el (nnselect-request-create-group): Better
argument parsing.

lisp/gnus/nnselect.el

index 560468e2f7f0cf967054597da8d036a522495672..89255ee7b19d331cebb9e378a0b7b4d76d117ef5 100644 (file)
@@ -524,11 +524,10 @@ If this variable is nil, or if the provided function returns nil,
          (specs (assq 'nnselect-specs args))
          (function-spec
           (or  (alist-get 'nnselect-function specs)
-              (list
-              (read-from-minibuffer "Function: " nil nil t))))
+              (read-from-minibuffer "Function: " nil nil t)))
          (args-spec
           (or  (alist-get 'nnselect-args specs)
-               (read-from-minibuffer "Args: " nil nil t)))
+               (read-from-minibuffer "Args: " nil nil t nil "nil")))
          (nnselect-specs (list (cons 'nnselect-function function-spec)
                               (cons 'nnselect-args args-spec))))
     (gnus-group-set-parameter group 'nnselect-specs nnselect-specs)