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
c9ae8cbb
Commit
c9ae8cbb
authored
Aug 29, 2002
by
Juanma Barranquero
Browse files
(occur-mode-hook): New hook.
(occur-mode): Use it. (occur-hook): Set default to nil.
parent
4390021b
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
15 additions
and
3 deletions
+15
-3
lisp/ChangeLog
lisp/ChangeLog
+6
-0
lisp/replace.el
lisp/replace.el
+9
-3
No files found.
lisp/ChangeLog
View file @
c9ae8cbb
2002-08-29 Juanma Barranquero <lektu@terra.es>
* replace.el (occur-mode-hook): New hook.
(occur-mode): Use it.
(occur-hook): Set default to nil.
2002-08-29 Richard M. Stallman <rms@gnu.org>
* emacs-lisp/bytecomp.el (byte-compile-log-file): Use \f.
...
...
lisp/replace.el
View file @
c9ae8cbb
...
...
@@ -464,8 +464,13 @@ end of the buffer."
"Arguments to pass to `occur-1' to revert an Occur mode buffer.
See `occur-revert-function'."
)
(
defcustom
occur-hook
'
(
turn-on-font-lock
)
"Hooks run when `occur' is called."
(
defcustom
occur-mode-hook
'
(
turn-on-font-lock
)
"Hook run when entering Occur mode."
:type
'hook
:group
'matching
)
(
defcustom
occur-hook
nil
"Hook run when `occur' is called."
:type
'hook
:group
'matching
)
...
...
@@ -482,7 +487,8 @@ Alternatively, click \\[occur-mode-mouse-goto] on an item to go to it.
(
setq
major-mode
'occur-mode
)
(
setq
mode-name
"Occur"
)
(
set
(
make-local-variable
'revert-buffer-function
)
'occur-revert-function
)
(
make-local-variable
'occur-revert-arguments
))
(
make-local-variable
'occur-revert-arguments
)
(
run-hooks
'occur-mode-hook
))
(
defun
occur-revert-function
(
ignore1
ignore2
)
"Handle `revert-buffer' for Occur mode buffers."
...
...
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