emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/files.el


From: Juri Linkov
Subject: [Emacs-diffs] Changes to emacs/lisp/files.el
Date: Tue, 09 May 2006 22:55:30 +0000

Index: emacs/lisp/files.el
diff -u emacs/lisp/files.el:1.830 emacs/lisp/files.el:1.831
--- emacs/lisp/files.el:1.830   Sat May  6 14:37:04 2006
+++ emacs/lisp/files.el Tue May  9 22:55:30 2006
@@ -2349,31 +2349,29 @@
 ;; For variables defined in the C source code the declaration should go here:
 
 ;; FIXME: Some variables should be moved according to the rules above.
-(let ((string-or-null (lambda (a) (or (stringp a) (null a)))))
-  (eval
-   `(mapc (lambda (pair)
-           (put (car pair) 'safe-local-variable (cdr pair)))
-         '((byte-compile-dynamic . booleanp)
-           (byte-compile-dynamic-docstrings . booleanp)
-           (byte-compile-warnings . booleanp)
-           (c-basic-offset     .  integerp)
-           (c-file-style       .  stringp)
-           (c-indent-level     .  integerp)
-           (comment-column     .  integerp)
-           (compile-command    .  string-or-null-p)
-           (find-file-visit-truename . booleanp)
-           (fill-column        .  integerp)
-           (fill-prefix        .  string-or-null-p)
-           (indent-tabs-mode   .  booleanp) ;; C source code
-           (kept-old-versions  .  integerp)
-           (kept-new-versions  .  integerp)
-           (left-margin        .  integerp)
-           (no-byte-compile    .  booleanp)
-           (no-update-autoloads . booleanp)
-           (outline-regexp     .  string-or-null-p)
-           (tab-width          .  integerp) ;; C source code
-           (truncate-lines     .  booleanp) ;; C source code
-           (version-control    .  symbolp)))))
+(mapc (lambda (pair)
+       (put (car pair) 'safe-local-variable (cdr pair)))
+      '((byte-compile-dynamic            . booleanp)
+       (byte-compile-dynamic-docstrings . booleanp)
+       (byte-compile-warnings           . booleanp)
+       (c-basic-offset                  . integerp)
+       (c-file-style                    . stringp)
+       (c-indent-level                  . integerp)
+       (comment-column                  . integerp)
+       (compile-command                 . string-or-null-p)
+       (find-file-visit-truename        . booleanp)
+       (fill-column                     . integerp)
+       (fill-prefix                     . string-or-null-p)
+       (indent-tabs-mode                . booleanp) ;; C source code
+       (kept-old-versions               . integerp)
+       (kept-new-versions               . integerp)
+       (left-margin                     . integerp)
+       (no-byte-compile                 . booleanp)
+       (no-update-autoloads             . booleanp)
+       (outline-regexp                  . string-or-null-p)
+       (tab-width                       . integerp) ;; C source code
+       (truncate-lines                  . booleanp) ;; C source code
+       (version-control                 . symbolp)))
 
 (put 'c-set-style 'safe-local-eval-function t)
 




reply via email to

[Prev in Thread] Current Thread [Next in Thread]