593 |
(if default-enable-multibyte-characters |
(if default-enable-multibyte-characters |
594 |
locale-coding-system 'raw-text-unix)) |
locale-coding-system 'raw-text-unix)) |
595 |
;; Avoid possible error by using a directory that always exists. |
;; Avoid possible error by using a directory that always exists. |
596 |
(default-directory "/")) |
(default-directory |
597 |
|
(if (and (file-directory-p default-directory) |
598 |
|
(not (find-file-name-handler default-directory |
599 |
|
'file-directory-p))) |
600 |
|
default-directory |
601 |
|
"/"))) |
602 |
;; Prevent any attempt to use display terminal fanciness. |
;; Prevent any attempt to use display terminal fanciness. |
603 |
(setenv "TERM" "dumb") |
(setenv "TERM" "dumb") |
604 |
;; In Debian Woody, at least, we get overlong lines under X |
;; In Debian Woody, at least, we get overlong lines under X |