(auth-source-netrc-search): The asserts seem to want to have more parameters.
authorLars Ingebrigtsen <larsi@gnus.org>
Mon, 14 Feb 2011 03:24:26 +0000 (19:24 -0800)
committerLars Ingebrigtsen <larsi@gnus.org>
Mon, 14 Feb 2011 03:24:26 +0000 (19:24 -0800)
lisp/ChangeLog
lisp/auth-source.el

index 68a3140..7ac5b36 100644 (file)
@@ -1,5 +1,8 @@
 2011-02-14  Lars Ingebrigtsen  <larsi@gnus.org>
 
+       * auth-source.el (auth-source-netrc-search): The asserts seem to want
+       to have more parameters.
+
        * nnimap.el (nnimap-send-command): Mark the command time for each
        command, so that we don't get NOOPs stepping on our toes.
 
index de69262..8f4a6dd 100644 (file)
@@ -483,7 +483,7 @@ must call it to obtain the actual value."
 
       (assert
        (or (eq t create) (listp create)) t
-       "Invalid auth-source :create parameter (must be nil, t, or a list)")
+       "Invalid auth-source :create parameter (must be nil, t, or a list): %s %s")
 
       (setq filtered-backends (copy-sequence backends))
       (dolist (backend backends)
@@ -779,7 +779,7 @@ Note that the MAX parameter is used so we can exit the parse early."
 See `auth-source-search' for details on SPEC."
   ;; just in case, check that the type is correct (null or same as the backend)
   (assert (or (null type) (eq type (oref backend type)))
-          t "Invalid netrc search")
+          t "Invalid netrc search: %s %s")
 
   (let ((results (auth-source-netrc-normalize
                   (auth-source-netrc-parse