summaryrefslogtreecommitdiff
path: root/lisp/textmodes
diff options
context:
space:
mode:
authorChristopher Zaborsky <rogue@erratum.com>1992-11-03 19:47:32 +0000
committerChristopher Zaborsky <rogue@erratum.com>1992-11-03 19:47:32 +0000
commit33b4a308e6b4b9825b7010dc6fa205a74a23f1e4 (patch)
tree5f5c26ff99d3624e196920ffc64ca3cb79dfa106 /lisp/textmodes
parent2de735de75f96dd7f00205f9b9f2e76cce4d8101 (diff)
downloademacs-33b4a308e6b4b9825b7010dc6fa205a74a23f1e4.tar.gz
emacs-33b4a308e6b4b9825b7010dc6fa205a74a23f1e4.tar.bz2
emacs-33b4a308e6b4b9825b7010dc6fa205a74a23f1e4.zip
Dox fix.
Diffstat (limited to 'lisp/textmodes')
-rw-r--r--lisp/textmodes/scribe.el13
1 files changed, 7 insertions, 6 deletions
diff --git a/lisp/textmodes/scribe.el b/lisp/textmodes/scribe.el
index 891c67ea314..423de634308 100644
--- a/lisp/textmodes/scribe.el
+++ b/lisp/textmodes/scribe.el
@@ -42,8 +42,8 @@ if typed after an @Command form.")
"Open parenthesis characters for Scribe.")
(defconst scribe-close-parentheses "])}>"
- "Close parenthesis characters for Scribe. These should match up with
-scribe-open-parenthesis.")
+ "Close parenthesis characters for Scribe.
+These should match up with `scribe-open-parenthesis'.")
(if (null scribe-mode-syntax-table)
(let ((st (syntax-table)))
@@ -149,9 +149,9 @@ scribe-electric-parenthesis
(call-interactively 'compile))
(defun scribe-envelop-word (string count)
- "Surround current word with Scribe construct @STRING[...]. COUNT
-specifies how many words to surround. A negative count means to skip
-backward."
+ "Surround current word with Scribe construct @STRING[...].
+COUNT specifies how many words to surround. A negative count means
+to skip backward."
(let ((spos (point)) (epos (point)) (ccoun 0) noparens)
(if (not (zerop count))
(progn (if (= (char-syntax (preceding-char)) ?w)
@@ -253,7 +253,8 @@ backward."
(forward-char -1))
(defun scribe-insert-quote (count)
- "If scribe-electric-quote is non-NIL, insert ``, '' or \" according
+ "Insert ``, '' or \" according to preceding character.
+If `scribe-electric-quote' is non-NIL, insert ``, '' or \" according
to preceding character. With numeric arg N, always insert N \" characters.
Else just insert \"."
(interactive "P")