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
337f393e
Commit
337f393e
authored
May 15, 2008
by
John Paul Wallington
Browse files
(diff-current-defun): Use `buffer-local-value'.
parent
3516a018
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
14 additions
and
1 deletion
+14
-1
lisp/ChangeLog
lisp/ChangeLog
+13
-0
lisp/diff-mode.el
lisp/diff-mode.el
+1
-1
No files found.
lisp/ChangeLog
View file @
337f393e
...
...
@@ -9,6 +9,12 @@
2008-05-15 John Paul Wallington <jpw@pobox.com>
* arc-mode.el (archive-add-new-member): Use `derived-mode-p'.
(archive-*-extract): Use `zerop'
(archive-*-write-file-member): Use `or', use `zerop'.
* diff-mode.el (diff-current-defun): Use `buffer-local-value'.
* ibuffer.el (ibuffer-assert-ibuffer-mode): New defsubst.
(ibuffer-mark-interactive, ibuffer-set-mark)
(ibuffer-insert-buffer-line, ibuffer-redisplay-current)
...
...
@@ -16,6 +22,13 @@
(ibuffer-update-title-and-summary)
(ibuffer-redisplay-engine): Use it.
* ibuf-ext.el (ibuffer-interactive-filter-by-mode)
(ibuffer-set-filter-groups-by-mode, ibuffer-list-buffer-modes)
(define-ibuffer-filter mode, define-ibuffer-filter used-mode)
(define-ibuffer-sorter major-mode, ibuffer-mark-unsaved-buffers)
(ibuffer-mark-read-only-buffers)
(ibuffer-mark-dired-buffers): Use `buffer-local-value'.
* ibuf-macs.el (ibuffer-aif, ibuffer-awhen, ibuffer-save-marks)
(define-ibuffer-column, define-ibuffer-sorter)
(define-ibuffer-op, define-ibuffer-filter): Add declarations
...
...
lisp/diff-mode.el
View file @
337f393e
...
...
@@ -1717,7 +1717,7 @@ For use in `add-log-current-defun-function'."
(
let
((
old
(
if
switched
dst
src
)))
(
with-temp-buffer
(
insert
(
car
old
))
(
funcall
(
with-current-buffer
buf
major-mode
))
(
funcall
(
buffer-local-value
'
major-mode
buf
))
(
goto-char
(
+
(
point-min
)
(
cdr
old
)))
(
add-log-current-defun
))))
(
with-current-buffer
buf
...
...
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