Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
d4308a4d
Commit
d4308a4d
authored
Jan 27, 1999
by
Eli Zaretskii
Browse files
(command-line): Set default eol-mnemonic-* strings to
display end-of-line format in mode line.
parent
de0d1fc5
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
12 additions
and
0 deletions
+12
-0
lisp/startup.el
lisp/startup.el
+12
-0
No files found.
lisp/startup.el
View file @
d4308a4d
...
...
@@ -558,6 +558,18 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'."
;;! ;; Choose a good default value for split-window-keep-point.
;;! (setq split-window-keep-point (> baud-rate 2400))
;; Set the default strings to display in mode line for
;; end-of-line formats that aren't native to this platform.
(
cond
((
memq
system-type
'
(
ms-dos
windows-nt
emx
))
(
setq
eol-mnemonic-unix
"(Unix)"
)
(
setq
eol-mnemonic-mac
"(Mac)"
))
;; Mac-specific settings should come here, once there's a
;; system-type symbol specific to MacOS.
(
t
; this is for Unix/GNU/Linux systems
(
setq
eol-mnemonic-dos
"(DOS)"
)
(
setq
eol-mnemonic-mac
"(Mac)"
)))
;; Read window system's init file if using a window system.
(
condition-case
error
(
if
(
and
window-system
(
not
noninteractive
))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment