From e726eb56f8cf2ed0242e61d00616fc8caed68d56 Mon Sep 17 00:00:00 2001
From: Karl Heuer <kwzh@gnu.org>
Date: Tue, 25 Apr 1995 22:29:51 +0000
Subject: [PATCH] (gud-sentinel): Use force-mode-line-update.

---
 lisp/gud.el | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lisp/gud.el b/lisp/gud.el
index 94daa423404..859c0e0bd40 100644
--- a/lisp/gud.el
+++ b/lisp/gud.el
@@ -1217,8 +1217,7 @@ comint mode, which see."
 	       (progn
 		 ;; Write something in *compilation* and hack its mode line,
 		 (set-buffer (process-buffer proc))
-		 ;; Force mode line redisplay soon
-		 (set-buffer-modified-p (buffer-modified-p))
+		 (force-mode-line-update)
 		 (if (eobp)
 		     (insert ?\n mode-name " " msg)
 		   (save-excursion
-- 
2.39.5