From 68890d7ebc567261df925bf1032e512ccdece661 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 1 Sep 2002 13:26:06 +0000 Subject: [PATCH] (jka-compr-handler): Add safe-magic property. --- lisp/jka-compr.el | 1 + 1 file changed, 1 insertion(+) diff --git a/lisp/jka-compr.el b/lisp/jka-compr.el index f898bc98a4f..8e347c3b1f6 100644 --- a/lisp/jka-compr.el +++ b/lisp/jka-compr.el @@ -757,6 +757,7 @@ There should be no more than seven characters after the final `/'." Lisp programs can bind this to t to do that. It is not recommended to set this variable permanently to anything but nil.") +(put 'jka-compr-handler 'safe-magic t) (defun jka-compr-handler (operation &rest args) (save-match-data (let ((jka-op (get operation 'jka-compr))) -- 2.39.5