* Fix `memory-report' for '--without-x' builds

	* lisp/emacs-lisp/memory-report.el
	(memory-report--image-cache): Don't call `image-cache-size' if
	unbound.

diff --git a/lisp/emacs-lisp/memory-report.el b/lisp/emacs-lisp/memory-report.el
index c88d9f2768a9bd9829b959919ce5227a60e31d7d..04ae87d9ea072730169de723922a6b55e7bd2c05 100644 (file)
--- a/lisp/emacs-lisp/memory-report.el
+++ b/lisp/emacs-lisp/memory-report.el
@@ -294,7 +294,9 @@ by counted more than once."
                                       (overlay-lists)))))
 
 (defun memory-report--image-cache ()
-  (list (cons "Total Image Cache Size" (image-cache-size))))
+  (list (cons "Total Image Cache Size" (if (fboundp 'image-cache-size)
+                                           (image-cache-size)
+                                         0))))
 
 (provide 'memory-report)