X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/ba603c98369e875b5b723b0b335a3c2b702af9c7..f94daca2487f73330315b06debd2cefe9fce7cae:/packages/gnorb/gnorb-registry.el

diff --git a/packages/gnorb/gnorb-registry.el b/packages/gnorb/gnorb-registry.el
index bcd5adc2c..92205653c 100644
--- a/packages/gnorb/gnorb-registry.el
+++ b/packages/gnorb/gnorb-registry.el
@@ -235,7 +235,9 @@ number of tracked messages, the number of tracked headings, and how much of the
   (let ((messages (length (gnorb-registry-tracked-messages)))
 	(headings (length (gnorb-registry-tracked-headings)))
 	(reg-size (registry-size gnus-registry-db))
-	(reg-max-size (oref gnus-registry-db max-size)))
+	(reg-max-size (if (slot-exists-p gnus-registry-db 'max-size)
+			  (oref gnus-registry-db max-size)
+			(oref gnus-registry-db max-hard))))
     (with-current-buffer "*Gnorb Usage*"
       (let ((inhibit-read-only t))
        (erase-buffer)