From 36045ff3301341130c1e2048a0fa73ec72fc68bf Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Wed, 28 Apr 2010 11:45:45 -0400 Subject: [PATCH] Revert last bug-reference-url-format change. * progmodes/bug-reference.el (bug-reference-url-format): Revert 2010-04-27 change due to security risk. --- lisp/ChangeLog | 5 +++++ lisp/progmodes/bug-reference.el | 3 +-- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 03deb82d0b1..a97a6e9cc7d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2010-04-28 Chong Yidong + + * progmodes/bug-reference.el (bug-reference-url-format): Revert + 2010-04-27 change due to security risk. + 2010-04-28 Stefan Monnier Make it possible to locally disable a globally enabled mode. diff --git a/lisp/progmodes/bug-reference.el b/lisp/progmodes/bug-reference.el index 1ddfddf89c1..462f978ab78 100644 --- a/lisp/progmodes/bug-reference.el +++ b/lisp/progmodes/bug-reference.el @@ -51,8 +51,7 @@ It can use `match-string' to get parts matched against There is no default setting for this, it must be set per file.") ;;;###autoload -(put 'bug-reference-url-format 'safe-local-variable - (lambda (s) (or (stringp s) (functionp s)))) +(put 'bug-reference-url-format 'safe-local-variable 'stringp) (defconst bug-reference-bug-regexp "\\([Bb]ug ?#\\|[Pp]atch ?#\\|RFE ?#\\|PR [a-z-+]+/\\)\\([0-9]+\\)" -- 2.39.2