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
500acb79
Commit
500acb79
authored
Jan 03, 2003
by
Dave Love
Browse files
(nroff-mode-hook): Customize.
(nroff-imenu-expression): New. (nroff-mode): Use it.
parent
bf9f5c17
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
12 additions
and
2 deletions
+12
-2
lisp/textmodes/nroff-mode.el
lisp/textmodes/nroff-mode.el
+12
-2
No files found.
lisp/textmodes/nroff-mode.el
View file @
500acb79
;;; nroff-mode.el --- GNU Emacs major mode for editing nroff source
;; Copyright (C) 1985,
19
86,
19
94,
19
95 Free Software Foundation, Inc.
;; Copyright (C) 1985, 86, 94, 95
, 97, 2001
Free Software Foundation, Inc.
;; Maintainer: FSF
;; Keywords: wp
...
...
@@ -68,6 +68,10 @@
st
)
"Syntax table used while in `nroff-mode'."
)
(
defvar
nroff-imenu-expression
;; man headers:
'
((
nil
"^\\.SH \"?\\([^\"\n]*\\)\"?$"
1
)))
(
defcustom
nroff-font-lock-keywords
(
list
;; Directives are . or ' at start of line, followed by
...
...
@@ -93,6 +97,11 @@
:group
'nroff
:type
'
(
repeat
regexp
))
(
defcustom
nroff-mode-hook
nil
"Hook run by function `nroff-mode'."
:type
'hook
:group
'nroff
)
;;;###autoload
(
define-derived-mode
nroff-mode
text-mode
"Nroff"
"Major mode for editing text intended for nroff to format.
...
...
@@ -118,7 +127,8 @@ closing requests for requests that are used in matched pairs."
(
set
(
make-local-variable
'comment-start
)
"\\\" "
)
(
set
(
make-local-variable
'comment-start-skip
)
"\\\\\"[ \t]*"
)
(
set
(
make-local-variable
'comment-column
)
24
)
(
set
(
make-local-variable
'comment-indent-function
)
'nroff-comment-indent
))
(
set
(
make-local-variable
'comment-indent-function
)
'nroff-comment-indent
)
(
set
(
make-local-variable
'imenu-generic-expression
)
nroff-imenu-expression
))
(
defun
nroff-outline-level
()
(
save-excursion
...
...
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