(mu-cite-load-registration-file): Check for the existence of

[elisp/mu-cite.git] / mu-register.el

diff --git a/mu-register.el b/mu-register.el
index b3a5023..5488dd3 100644 (file)
--- a/mu-register.el
+++ b/mu-register.el
@@ -87,9 +87,13 @@
             mu-registration-file)
          (insert-file-contents mu-registration-file))
        (setq mu-registration-file-coding-system
-             (static-if (<= emacs-major-version 19)
-                 file-coding-system
-               buffer-file-coding-system))
+             (static-cond
+              ((boundp 'buffer-file-coding-system)
+               (symbol-value 'buffer-file-coding-system))
+              ((boundp 'file-coding-system)
+               (symbol-value 'file-coding-system))
+              (t
+               nil)))
        (let ((exp (read (current-buffer))))
          (or (eq (car (cdr exp)) mu-registration-symbol)
              (setcar (cdr exp) mu-registration-symbol))