* international/mule-cmds.el (ucs-completions): Mark as risky.

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6678353629d..9688a39a27b 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2008-11-17  Juanma Barranquero  <lekktu@gmail.com>
+
+        * international/mule-cmds.el (ucs-completions): Mark as risky.
+
 2008-11-17  Martin Rudalics  <rudalics@gmx.at>
 
         * help-macro.el (three-step-help): Remove * from defcustom.
@@ -949,7 +953,7 @@
 
         * subr.el (top-level): Require `cl' when compiling.
 
-2008-10-20  David Reitter <david.reitter@gmail.com>
+2008-10-20  David Reitter  <david.reitter@gmail.com>
 
         * info.el (Info-mode): Do not remove an existing header line if
         `Info-use-header-line' is nil.
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index 75ba2f026fc..c78efc73c70 100644
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -2864,6 +2864,7 @@ on encoding."
 
 (defvar ucs-completions (lazy-completion-table ucs-completions ucs-names)
   "Lazy completion table for completing on Unicode character names.")
+(put 'ucs-completions 'risky-local-variable t)
 
 (defun read-char-by-name (prompt)
   "Read a character by its Unicode name or hex number string.