Mercurial > emacs
changeset 104343:396aecca2f45
(ucs-normalize-hfs-nfd-post-read-conversion):
Remove unused var `buffer-modified-p'.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Tue, 18 Aug 2009 19:17:22 +0000 |
| parents | 867af630a71e |
| children | ffa2f09da5b2 |
| files | lisp/ChangeLog lisp/international/ucs-normalize.el |
| diffstat | 2 files changed, 5 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Tue Aug 18 19:11:41 2009 +0000 +++ b/lisp/ChangeLog Tue Aug 18 19:17:22 2009 +0000 @@ -1,5 +1,8 @@ 2009-08-18 Stefan Monnier <monnier@iro.umontreal.ca> + * international/ucs-normalize.el (ucs-normalize-hfs-nfd-post-read-conversion): + Remove unused var `buffer-modified-p'. + * minibuffer.el (completion--do-completion): Move point for the #b001 case as well (bug#4176). (minibuffer-complete, minibuffer-complete-word): Don't move point.
--- a/lisp/international/ucs-normalize.el Tue Aug 18 19:11:41 2009 +0000 +++ b/lisp/international/ucs-normalize.el Tue Aug 18 19:17:22 2009 +0000 @@ -585,9 +585,8 @@ (save-excursion (save-restriction (narrow-to-region (point) (+ (point) len)) - (let ((buffer-modified-p (buffer-modified-p))) - (ucs-normalize-HFS-NFC-region (point-min) (point-max)) - (- (point-max) (point-min)))))) + (ucs-normalize-HFS-NFC-region (point-min) (point-max)) + (- (point-max) (point-min))))) ;; Pre-write conversion for `utf-8-hfs'. (defun ucs-normalize-hfs-nfd-pre-write-conversion (from to)