comparison lisp/progmodes/compile.el @ 91010:aaccdab0ee26

Merge from emacs--devo--0 Patches applied: * emacs--devo--0 (patch 852-856) - Update from CVS - Merge from emacs--rel--22 * emacs--rel--22 (patch 93-96) - Update from CVS - Merge from gnus--rel--5.10 * gnus--rel--5.10 (patch 245) - Update from CVS Revision: [e-mail]/emacs--unicode--0--patch-249

91009:e7395a700642

	(setq filename (command-line-normalize-file-name filename))

	;; Store it for the possibly unnormalized name
	(puthash file
		 ;; Retrieve or create file-structure for normalized name
		 (or (gethash (list filename) compilation-locs)
		     (puthash (list filename)
			      (list (list filename spec-directory) fmt)
			      compilation-locs))
		 compilation-locs))))

91010:aaccdab0ee26

	(setq filename (command-line-normalize-file-name filename))

	;; Store it for the possibly unnormalized name
	(puthash file
		 ;; Retrieve or create file-structure for normalized name
		 ;; The gethash used to not use spec-directory, but
		 ;; this leads to errors when files in different
		 ;; directories have the same name:
		 ;; http://lists.gnu.org/archive/html/emacs-devel/2007-08/msg00463.html
		 (or (gethash (cons filename spec-directory) compilation-locs)
		     ;; TODO should this, without spec-directory, be
		     ;; done at all?
		     (puthash (list filename)
			      (list (list filename spec-directory) fmt)
			      compilation-locs))
		 compilation-locs))))