el/dot-emacs.el: Use plain `equal' for comparing terminal names.

It seems that the three-argument version of `assoc' is too new.

diff --git a/el/dot-emacs.el b/el/dot-emacs.el
index 0a5274cc18ce83cfbe014824681574c7d034f19b..07e177ddf97df0bdbb25a33d238b5716d8e94bca 100644 (file)
--- a/el/dot-emacs.el
+++ b/el/dot-emacs.el
@@ -1873,9 +1873,9 @@ (defun mdw-update-terminal-title ()
   (when (let ((term (frame-parameter nil 'tty-type)))
          (and term (string-match "^xterm" term)))
     (let* ((tty (frame-parameter nil 'tty))
-          (old (assoc tty terminal-title-alist #'string=))
+          (old (assoc tty terminal-title-alist))
           (new (format-mode-line frame-title-format)))
-      (unless (and old (string= (cdr old) new))
+      (unless (and old (equal (cdr old) new))
        (if old (rplacd old new)
          (setq terminal-title-alist
                (cons (cons tty new) terminal-title-alist)))