From dde25849fd0fac2daf39d2c98d64f3d4faf0b7ec Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 10 Nov 1995 17:58:55 +0000 Subject: [PATCH] Fix previous change. --- lisp/dos-fns.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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)))) -- 2.39.2