;; Applied patch from NISHIDA Masakazu <m_nisida@ca2.so-net.ne.jp>.

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

diff --git a/mu-register.el b/mu-register.el
index 253d7cb..46167de 100644 (file)
--- a/mu-register.el
+++ b/mu-register.el
@@ -148,6 +148,7 @@
                (mu-cite-remove-text-properties
                 (read-string "Citation name? "
                              (or (mu-cite-get-value 'x-attribution)
+                                 (mu-cite-get-value 'x-cite-me)
                                  (mu-cite-get-value 'full-name))
                              'mu-register-history))))
 
@@ -166,6 +167,7 @@
                  (read-string "Citation name? "
                               (or return1
                                   (mu-cite-get-value 'x-attribution)
+                                  (mu-cite-get-value 'x-cite-me)
                                   (mu-cite-get-value 'full-name))
                               'mu-register-history))))
     (if (and (or mu-cite-allow-null-string-registration