diff options
| -rw-r--r-- | lisp/dos-fns.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/dos-fns.el b/lisp/dos-fns.el index 4f60325d083..1f2a7153ef9 100644 --- a/lisp/dos-fns.el +++ b/lisp/dos-fns.el @@ -28,7 +28,7 @@ ;;; Code: ;;; Add %t: into the mode line format just after the open-paren. -(let ((tail (assoc " %[(" mode-line-format))) +(let ((tail (member " %[(" mode-line-format))) (setcdr tail (cons (purecopy "%t:") (cdr tail)))) |