This commit was manufactured by cvs2svn to create branch 't-gnus-6_16'.

[elisp/gnus.git-] / lisp / nnoo.el

diff --git a/lisp/nnoo.el b/lisp/nnoo.el
index 8a360d9..384599b 100644 (file)
--- a/lisp/nnoo.el
+++ b/lisp/nnoo.el
@@ -27,8 +27,8 @@
 
 ;;; Code:
 
-(require 'nnheader)
 (eval-when-compile (require 'cl))
+(require 'nnheader)
 
 (defvar nnoo-definition-alist nil)
 (defvar nnoo-state-alist nil)
@@ -201,8 +201,8 @@
        (while (setq def (pop defs))
          (unless (assq (car def) bvariables)
            (nconc bvariables
-                  (list (cons (car def) (and (boundp (car def))
-                                             (symbol-value (car def)))))))
+                  (list (cons (car def) (and (boundp (car def))
+                                             (symbol-value (car def)))))))
          (if (equal server "*internal-non-initialized-backend*")
              (set (car def) (symbol-value (cadr def)))
            (set (car def) (cadr def)))))
@@ -254,7 +254,7 @@
        (setcdr bstate (delq defs (cdr bstate)))
        (pop defs)
        (while defs
-         (set (car (pop defs)) nil)))))
+         (set (car (pop defs)) nil))))) 
   t)
 
 (defun nnoo-close (backend)