[Emacs-diffs] Changes to emacs/lisp/net/tramp.el,v

[Stefan Monnier]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Stefan Monnier <monnier>        08/03/17 20:19:04

Index: net/tramp.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/net/tramp.el,v
retrieving revision 1.177
retrieving revision 1.178
diff -u -b -r1.177 -r1.178
--- net/tramp.el        15 Mar 2008 21:54:02 -0000      1.177
+++ net/tramp.el        17 Mar 2008 20:18:58 -0000      1.178
@@ -6,7 +6,7 @@
 
 ;; (copyright statements below in code to be updated with the above notice)
 
-;; Author: Kai Großjohann <address@hidden>
+;; Author: Kai Großjohann <address@hidden>
 ;;         Michael Albinus <address@hidden>
 ;; Keywords: comm, processes
 
@@ -4614,10 +4614,10 @@
    (and (natnump last-input-event)
        (or
         ;; ?\t has event-modifier 'control.
-        (char-equal last-input-event ?\t)
+        (equal last-input-event ?\t)
         (and (not (event-modifiers last-input-event))
-             (or (char-equal last-input-event ?\?)
-                 (char-equal last-input-event ?\ )))))
+             (or (equal last-input-event ?\?)
+                 (equal last-input-event ?\ )))))
    ;; XEmacs.
    (and (featurep 'xemacs)
        ;; `last-input-event' might be nil.
@@ -4626,14 +4626,14 @@
        (funcall (symbol-function 'event-to-character) last-input-event)
        (or
         ;; ?\t has event-modifier 'control.
-        (char-equal
+        (equal
          (funcall (symbol-function 'event-to-character)
                   last-input-event) ?\t)
         (and (not (event-modifiers last-input-event))
-             (or (char-equal
+             (or (equal
                   (funcall (symbol-function 'event-to-character)
                            last-input-event) ?\?)
-                 (char-equal
+                 (equal
                   (funcall (symbol-function 'event-to-character)
                            last-input-event) ?\ )))))))
 
@@ -7383,7 +7383,7 @@
 ;;   transfer method to use.  (Greg Stark)
 ;; * Remove unneeded parameters from methods.
 ;; * Invoke rsync once for copying a whole directory hierarchy.
-;;   (Francesco Potortì)
+;;   (Francesco Potortì)
 ;; * Make it work for different encodings, and for different file name
 ;;   encodings, too.  (Daniel Pittman)
 ;; * Progress reports while copying files.  (Michael Kifer)