# HG changeset patch
# User Andreas Schwab <schwab@suse.de>
# Date 1172395451 0
# Node ID bebed32eb12f0fbb2b2823288658f13bd686b2bd
# Parent  1cd9f0d1c35ac6c682b6f77c131bc67a365aa9b8
(hack-one-local-variable-eval-safep): Correct handling
of edebug-form-spec property value.  Reported by Johan Bockg���rd
<bojohan+mail@dd.chalmers.se>.

diff -r 1cd9f0d1c35a -r bebed32eb12f lisp/files.el
--- a/lisp/files.el	Sun Feb 25 06:43:10 2007 +0000
+++ b/lisp/files.el	Sun Feb 25 09:24:11 2007 +0000
@@ -2787,7 +2787,8 @@
 		    ;; During bootstrapping, edebug-basic-spec might not be
 		    ;; defined yet.
                     (and (fboundp 'edebug-basic-spec)
-                         (edebug-basic-spec val))))))
+			 (hack-one-local-variable-quotep val)
+                         (edebug-basic-spec (nth 1 val)))))))
       ;; Allow expressions that the user requested.
       (member exp safe-local-eval-forms)
       ;; Certain functions can be allowed with safe arguments