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
3595955c
Commit
3595955c
authored
May 06, 1995
by
Richard M. Stallman
Browse files
All autoload cookies disabled.
parent
869d4256
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
11 additions
and
11 deletions
+11
-11
lisp/textmodes/ispell4.el
lisp/textmodes/ispell4.el
+8
-8
lisp/textmodes/outline.el
lisp/textmodes/outline.el
+3
-3
No files found.
lisp/textmodes/ispell4.el
View file @
3595955c
...
...
@@ -243,7 +243,7 @@ that have not already been dumped will be lost."
(
define-key
ispell-menu-map
[ispell-buffer]
'
(
"Check Buffer"
.
ispell
))
;;;
###
autoload
;;;autoload
(
defun
ispell
(
&optional
buf
start
end
)
"Run Ispell over current buffer's visited file.
First the file is scanned for misspelled words, then Ispell
...
...
@@ -320,7 +320,7 @@ q, \\[keyboard-quit] Leave the command loop. You can come back later with \\[is
(
message
"Ispell parsing done."
)
(
ispell-next
))))
;;;
###
autoload
;;;autoload
(
defalias
'ispell-buffer
'ispell
)
(
defun
ispell-next
()
...
...
@@ -361,7 +361,7 @@ Return value is t unless exit is due to typing `q'."
(
message
"Bad ispell internal list"
))))
(
ispell-dump
)))
;;;
###
autoload
;;;autoload
(
defun
ispell-word
(
&optional
resume
)
"Check the spelling of the word under the cursor.
See the command `ispell' for more information.
...
...
@@ -382,9 +382,9 @@ With a prefix argument, resume handling of the previous Ispell command."
(
define-key
esc-map
"$"
'spell-word
)
(
spell-word
)))))))
;;;
###
autoload (define-key esc-map "$" 'ispell-word)
;;;autoload (define-key esc-map "$" 'ispell-word)
;;;
###
autoload
;;;autoload
(
defun
ispell-region
(
start
&optional
end
)
"Check the spelling for all of the words in the region."
(
interactive
"r"
)
...
...
@@ -793,7 +793,7 @@ will help find those completions.")
(
put
'ispell-lookup-last-bow
'permanent-local
t
)
;;;; Interactive functions.
;;;
###
autoload
;;;autoload
(
defun
ispell-complete-word
(
&optional
interior-frag
)
"Complete word using letters at point to word beginning using `look'.
With optional argument INTERIOR-FRAG, word fragment at point is assumed to be
...
...
@@ -902,7 +902,7 @@ See also `ispell-look-dictionary' and `ispell-gnu-look-still-broken-p'."
(
display-completion-list
list
)))
(
message
"Making completion list...done"
)))))
;;;
###
autoload
;;;autoload
(
defun
ispell-complete-word-interior-frag
()
"Runs `ispell-complete-word' with a non-nil INTERIOR-FRAG.
A completion list is built for word fragment at point which is assumed to be
...
...
@@ -982,7 +982,7 @@ Otherwise, it must be a function which is called to get the limit.")
(
defvar
ispell-message-limit
(
*
100
80
)
"*Ispell-message will check no more than this number of characters."
)
;;;
###
autoload
;;;autoload
(
defun
ispell-message
()
"Check the spelling of a mail message or news post.
Don't check spelling of message headers (except subject) or included messages.
...
...
lisp/textmodes/outline.el
View file @
3595955c
;;; outline.el --- outline mode commands for Emacs
;; Copyright (C) 1986, 1993, 1994 Free Software Foundation, Inc.
;; Copyright (C) 1986, 1993, 1994
, 1995
Free Software Foundation, Inc.
;; Maintainer: FSF
;; Keywords: outlines
...
...
@@ -149,7 +149,7 @@ in the file it applies to.")
(
"\\[\\([A-Z][A-Za-z]+\\)*[0-9]+\\]"
.
font-lock-type-face
))
"Additional expressions to highlight in Outline mode."
)
;;;
###
autoload
;;;autoload
(
defun
outline-mode
()
"Set major mode for editing outlines with selective display.
Headings are lines which start with asterisks: one for major headings,
...
...
@@ -235,7 +235,7 @@ After that, changing the prefix key requires manipulating keymaps.")
(
cons
(
cons
'outline-minor-mode
outline-minor-mode-map
)
minor-mode-map-alist
)))
;;;
###
autoload
;;;autoload
(
defun
outline-minor-mode
(
&optional
arg
)
"Toggle Outline minor mode.
With arg, turn Outline minor mode on if arg is positive, off otherwise.
...
...
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