diff lisp/make-docfile.el @ 272:c5d627a313b1 r21-0b34

Import from CVS: tag r21-0b34
author cvs
date Mon, 13 Aug 2007 10:28:48 +0200
parents b2472a1930f2
children 558f606b08ae
line wrap: on
line diff
--- a/lisp/make-docfile.el	Mon Aug 13 10:27:41 2007 +0200
+++ b/lisp/make-docfile.el	Mon Aug 13 10:28:48 2007 +0200
@@ -108,7 +108,12 @@
 	  arg)
       (setq arg (locate-library arg0))
       (if (null arg)
+	  (progn
 	  (princ (format "Error:  dumped file %s does not exist\n" arg0))
+	  ;; Uncomment in case of difficulties
+	  ;;(print (format "late-packages: %S" late-packages))
+	  ;;(print (format "guessed-roots: %S" (paths-find-emacs-roots invocation-directory invocation-name)))
+	  )
 	(if (null (member arg processed))
 	    (progn
 	      (if (and (null docfile-out-of-date)