(U-000278B8): Apply new conventions for glyph granularity.

[chise/xemacs-chise.git.1] / lisp / lib-complete.el

diff --git a/lisp/lib-complete.el b/lisp/lib-complete.el
index 69d5554..ea0bc69 100644 (file)
--- a/lisp/lib-complete.el
+++ b/lisp/lib-complete.el
@@ -128,8 +128,8 @@ Display MESSAGE and evaluate FORMS, returning value of the last one."
 ;;=== Completion caching ==================================================
 
 (defconst lib-complete:cache nil
-  "Used within read-library and read-library-internal to prevent 
-costly repeated calls to library-all-completions.
+  "Used within `read-library' and `read-library-internal' to prevent 
+costly repeated calls to `library-all-completions'.
 Format is a list of lists of the form
 
     ([<path> <subdir>] <cache-record> <cache-record> ...)
@@ -306,10 +306,7 @@ and CODESYS.  The default for DISPLAY-FUNCTION is `find-file'."
   (let ((path (if (or (null library) (equal library ""))
                   nil
                (locate-file library load-path
-                            ;; decompression doesn't work with Mule -slb
-                            (if (featurep 'mule)
-                                ":.el:.elc"
-                              ":.el:.el.gz:.el.Z:.elc")))))
+                              ":.el:.el.gz:.el.Z:.elc"))))
     (if path (funcall (if (fboundp display-function)
                          display-function 'find-file)
                      path codesys)