gnus-compat.el (string-bytes): Work for XEmacs

[gnus] / lisp / registry.el

diff --git a/lisp/registry.el b/lisp/registry.el
index 45bfa07..bafb5c8 100644 (file)
--- a/lisp/registry.el
+++ b/lisp/registry.el
@@ -142,7 +142,7 @@
          :type hash-table
          :documentation "The data hashtable.")))
 ;; Do this separately, since defclass doesn't allow expressions in :initform.
-(oset-default registry-db max-size most-positive-fixnum)
+(oset-default 'registry-db max-size most-positive-fixnum)
 
 (defmethod initialize-instance :BEFORE ((this registry-db) slots)
   "Check whether a registry object needs to be upgraded."