changeset 77183:9d01047fbeaf

Revert 2007-03-25 change.
author Chong Yidong <cyd@stupidchicken.com>
date Fri, 13 Apr 2007 15:09:37 +0000
parents 81971498a673
children 9b9418b75eab
files lisp/files.el lisp/progmodes/compile.el
diffstat 2 files changed, 9 insertions(+), 8 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/files.el	Fri Apr 13 15:09:14 2007 +0000
+++ b/lisp/files.el	Fri Apr 13 15:09:37 2007 +0000
@@ -2434,13 +2434,14 @@
 
 (mapc (lambda (pair)
 	(put (car pair) 'safe-local-variable (cdr pair)))
-      '((buffer-read-only                . booleanp) ;; C source code
-	(fill-column                     . integerp) ;; C source code
-	(indent-tabs-mode                . booleanp) ;; C source code
-	(left-margin                     . integerp) ;; C source code
-	(no-update-autoloads             . booleanp)
-	(tab-width                       . integerp) ;; C source code
-	(truncate-lines                  . booleanp))) ;; C source code
+      '((buffer-read-only     . booleanp)   ;; C source code
+	(default-directory    . stringp)    ;; C source code
+	(fill-column          . integerp)   ;; C source code
+	(indent-tabs-mode     . booleanp)   ;; C source code
+	(left-margin          . integerp)   ;; C source code
+	(no-update-autoloads  . booleanp)
+	(tab-width            . integerp)   ;; C source code
+	(truncate-lines       . booleanp))) ;; C source code
 
 (put 'c-set-style 'safe-local-eval-function t)
 
--- a/lisp/progmodes/compile.el	Fri Apr 13 15:09:14 2007 +0000
+++ b/lisp/progmodes/compile.el	Fri Apr 13 15:09:37 2007 +0000
@@ -1042,7 +1042,7 @@
 		 highlight-regexp))
 	;; Output a mode setter, for saving and later reloading this buffer.
 	(insert "-*- mode: " name-of-mode
-		"; compilation-directory: " (prin1-to-string compilation-directory)
+		"; default-directory: " (prin1-to-string default-directory)
 		" -*-\n"
 		(format "%s started at %s\n\n"
 			mode-name