I use Debian GNU/Linux, and have the lisp source installed. The source files are gzipped. I attempted to use "find-library", and got the byte compiled program rather than the elisp source itself. It tried "M-x find-function find-library", and found this: 8<------------------------------------------------------------>8 (defun find-library (library &optional codesys display-function) "Find and display in the current window the source for the Elisp LIBRARY. LIBRARY should be a name without any path information and may include or omit the \".el\" suffix. Under XEmacs/Mule, the optional second argument CODESYS specifies the coding system to use when decoding the file. Interactively, with a prefix argument, this prompts for the coding system. Optional third argument DISPLAY-FUNCTION must take two arguments, the filename to display and CODESYS. The default for DISPLAY-FUNCTION is `find-file'." (interactive (list (read-library-name "Find library: ") (if current-prefix-arg (read-coding-system "Coding System: ")))) (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"))))) (if path (funcall (if (fboundp display-function) display-function 'find-file) path codesys) (error "(find-library): Cannot locate library `%s'" library)))) 8<------------------------------------------------------------>8 Note that in order to have found that, decompression must have worked, therefore "slb" is WRONG and that "if" can go away please. (featurep 'mule) ==> t ... is the case with this XEmacs "Honest Recruiter". -- As any limb well and duly exercised, grows stronger, the nerves of the body are corroborated thereby. --I. Watts. .''`. We are deB.ORG; You will be freed. : :' : <URL:http://www.debian.org/social_contract> `. `'