* registry.el (registry-insert): Make error message more helpful.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0fef445..82afd63 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2011-05-03  Teodor Zlatanov  <tzz@lifelogs.com>
+
+       * registry.el (registry-insert): Make error message more helpful.
+
 2011-05-02  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
        * gnus-html.el (gnus-html-schedule-image-fetching): Use

diff --git a/lisp/registry.el b/lisp/registry.el
index 1a18dbd..e82ca8d 100644 (file)
--- a/lisp/registry.el
+++ b/lisp/registry.el
@@ -272,7 +272,7 @@ Errors out if the key exists already."
     (assert (< (registry-size db)
               (oref db :max-hard))
            nil
-           "max-hard size limit reached")
+           "registry max-hard size limit reached")
 
     ;; store the entry
     (puthash key entry (oref db :data))