From: Reiner Steib <Reiner.Steib@gmx.de>
Date: Wed, 22 Aug 2007 19:42:19 +0000 (+0000)
Subject: (sort-fold-case, sort-numeric-base): Mark as safe-local-variable.
X-Git-Tag: emacs-pretest-22.1.90~942
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=aee002637aa97e6952c5320f9f74f83521a17c02;p=emacs.git

(sort-fold-case, sort-numeric-base): Mark as safe-local-variable.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a3a70d624cf..1ca6983051a 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2007-08-22  Reiner Steib  <Reiner.Steib@gmx.de>
+
+	* sort.el (sort-fold-case, sort-numeric-base): Mark as
+	safe-local-variable.
+
 2007-08-22  Johan Bockg,Ae(Brd  <bojohan@dd.chalmers.se>
 
 	* net/browse-url.el (browse-url-emacs): New function.
diff --git a/lisp/sort.el b/lisp/sort.el
index eb8de8243fc..582bb6d8e09 100644
--- a/lisp/sort.el
+++ b/lisp/sort.el
@@ -39,6 +39,7 @@
   "*Non-nil if the buffer sort functions should ignore case."
   :group 'sort
   :type 'boolean)
+;;;###autoload(put 'sort-fold-case 'safe-local-variable 'booleanp)
 
 ;;;###autoload
 (defun sort-subr (reverse nextrecfun endrecfun
@@ -258,6 +259,7 @@ the sort order."
   "*The default base used by `sort-numeric-fields'."
   :group 'sort
   :type 'integer)
+;;;###autoload(put 'sort-numeric-base 'safe-local-variable 'integerp)
 
 ;;;###autoload
 (defun sort-numeric-fields (field beg end)