emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] emacs/lisp ChangeLog international/ucs-normaliz...


From: Stefan Monnier
Subject: [Emacs-diffs] emacs/lisp ChangeLog international/ucs-normaliz...
Date: Tue, 18 Aug 2009 19:17:26 +0000

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Stefan Monnier <monnier>        09/08/18 19:17:25

Modified files:
        lisp           : ChangeLog 
        lisp/international: ucs-normalize.el 

Log message:
        (ucs-normalize-hfs-nfd-post-read-conversion):
        Remove unused var `buffer-modified-p'.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.15962&r2=1.15963
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/international/ucs-normalize.el?cvsroot=emacs&r1=1.4&r2=1.5

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.15962
retrieving revision 1.15963
diff -u -b -r1.15962 -r1.15963
--- ChangeLog   18 Aug 2009 19:11:41 -0000      1.15962
+++ ChangeLog   18 Aug 2009 19:17:22 -0000      1.15963
@@ -1,5 +1,8 @@
 2009-08-18  Stefan Monnier  <address@hidden>
 
+       * 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.

Index: international/ucs-normalize.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/international/ucs-normalize.el,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -b -r1.4 -r1.5
--- international/ucs-normalize.el      18 Aug 2009 01:26:05 -0000      1.4
+++ international/ucs-normalize.el      18 Aug 2009 19:17:25 -0000      1.5
@@ -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))))))
+      (- (point-max) (point-min)))))
 
 ;; Pre-write conversion for `utf-8-hfs'.
 (defun ucs-normalize-hfs-nfd-pre-write-conversion (from to)




reply via email to

[Prev in Thread] Current Thread [Next in Thread]