el/dot-emacs.el: Add missing `mdw-' prefix on `mdw-terminal-title-alist'.

diff --git a/el/dot-emacs.el b/el/dot-emacs.el
index 07e177ddf97df0bdbb25a33d238b5716d8e94bca..51d77d91e3d501b190a954a729e6ad7fd14d1d1d 100644 (file)
--- a/el/dot-emacs.el
+++ b/el/dot-emacs.el
@@ -1868,17 +1868,17 @@ (define-globalized-minor-mode mdw-global-point-overlay-mode
   mdw-point-overlay-mode
   (lambda () (if (not (minibufferp)) (mdw-point-overlay-mode t))))
 
-(defvar terminal-title-alist nil)
+(defvar mdw-terminal-title-alist nil)
 (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))
+          (old (assoc tty mdw-terminal-title-alist))
           (new (format-mode-line frame-title-format)))
       (unless (and old (equal (cdr old) new))
        (if old (rplacd old new)
-         (setq terminal-title-alist
-               (cons (cons tty new) terminal-title-alist)))
+         (setq mdw-terminal-title-alist
+               (cons (cons tty new) mdw-terminal-title-alist)))
        (send-string-to-terminal (concat "\e]2;" new "\e\\"))))))
 
 (add-hook 'post-command-hook 'mdw-update-terminal-title)