# HG changeset patch
# User Juri Linkov <juri@jurta.org>
# Date 1147215534 0
# Node ID 62bb603c277ba614ac1cbae89801d33e852de48d
# Parent  b0678252450c7cf02f3757292562465e35cba33a
(change-log-default-name): Put `string-or-null-p'
instead of lambda on `safe-local-variable' property.

diff -r b0678252450c -r 62bb603c277b lisp/add-log.el
--- a/lisp/add-log.el	Tue May 09 22:55:30 2006 +0000
+++ b/lisp/add-log.el	Tue May 09 22:58:54 2006 +0000
@@ -45,8 +45,7 @@
   :type '(choice (const :tag "default" nil)
 		 string)
   :group 'change-log)
-(put 'change-log-default-name 'safe-local-variable
-     (lambda (a) (or (stringp a) (null a))))
+(put 'change-log-default-name 'safe-local-variable 'string-or-null-p)
 
 (defcustom change-log-mode-hook nil
   "Normal hook run by `change-log-mode'."