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
c2bf3f2e
Commit
c2bf3f2e
authored
Aug 22, 1995
by
Richard M. Stallman
Browse files
(ediff-profile): Use make-local-hook and add and remove hooks locally.
parent
faec11db
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
6 additions
and
6 deletions
+6
-6
lisp/ediff-util.el
lisp/ediff-util.el
+6
-6
No files found.
lisp/ediff-util.el
View file @
c2bf3f2e
...
...
@@ -3035,15 +3035,15 @@ avoid loading cl-*."
(interactive)
(or (ediff-buffer-live-p ediff-control-buffer)
(error "This command runs only out of Ediff Control Buffer"))
(make-local-
variable
'pre-command-hook)
(make-local-
variable
'post-command-hook)
(make-local-
hook
'pre-command-hook)
(make-local-
hook
'post-command-hook)
(if (memq 'ediff-save-time pre-command-hook)
(progn (remove-hook 'pre-command-hook 'ediff-save-time)
(remove-hook 'post-command-hook 'ediff-calc-command-time)
(progn (remove-hook 'pre-command-hook 'ediff-save-time
t
)
(remove-hook 'post-command-hook 'ediff-calc-command-time
t
)
(setq ediff-command-begin-time '(0 0 0))
(message "Ediff profiling disabled"))
(add-hook 'pre-command-hook 'ediff-save-time t)
(add-hook 'post-command-hook 'ediff-calc-command-time)
(add-hook 'pre-command-hook 'ediff-save-time
t
t)
(add-hook 'post-command-hook 'ediff-calc-command-time
nil t
)
(message "Ediff profiling enabled")))
(defun ediff-print-diff-vector (diff-vector-var)
...
...
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