*** empty log message ***

[gnus] / lisp / nndb.el

diff --git a/lisp/nndb.el b/lisp/nndb.el
index 5c2645c..6cc95c3 100644 (file)
--- a/lisp/nndb.el
+++ b/lisp/nndb.el
@@ -175,7 +175,7 @@ article was posted to nndb")
       (nntp-send-command "^\\([23]\\|^423\\).*\n" "X-DATE" art)
       (setq msg (nndb-status-message))
       (if (string-match "^423" msg)
-          ()
+         ()
        (or (string-match "'\\(.+\\)'" msg)
            (error "Not a valid response for X-DATE command: %s"
                   msg))
@@ -202,12 +202,12 @@ article was posted to nndb")
     (set-buffer nntp-server-buffer)
     (goto-char (point-min))
     (if (looking-at "^[34]")
-       ;; x-expire returned error--presume no articles were expirable)
+       ;; x-expire returned error--presume no articles were expirable)
        (setq list nil)
       ;; otherwise, pull all of the following numbers into the list
       (re-search-forward "follows\r?\n?" nil t)
       (while (re-search-forward "^[0-9]+$" nil t)
-       (push (string-to-int (match-string 0)) list)))
+      (push (string-to-int (match-string 0)) list)))
     list))
 
 (defun nndb-request-expire-articles-remote
@@ -219,15 +219,15 @@ article was posted to nndb")
     ;; first calculate the wait period in days
     (setq days (or (and nnmail-expiry-wait-function
                        (funcall nnmail-expiry-wait-function group))
-                  nnmail-expiry-wait))
+    nnmail-expiry-wait))
     ;; now handle the special cases
     (cond (force
-          (setq days 0))
+    (setq days 0))
          ((eq days 'never)