From d99b259bdbf9c1f63ae932b2e213eaa0f160f773 Mon Sep 17 00:00:00 2001
From: Colin Walters <walters@gnu.org>
Date: Sat, 23 Feb 2002 21:33:33 +0000
Subject: [PATCH] (ibuffer-compile-format): Don't uselessly bind `pt' in
 generated function.

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

diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el
index 32334f5a94..2287f6894b 100644
--- a/lisp/ibuffer.el
+++ b/lisp/ibuffer.el
@@ -1368,8 +1368,7 @@ become unmarked."
 		       #'byte-compile
 		     #'identity)
 		   (nconc (list 'lambda '(buffer mark))
-			  `((let ,(append '(pt)
-					  (when str-used
+			  `((let ,(append (when str-used
 					    '(str))
 					  (when global-strlen-used
 					    '(strlen))
-- 
2.20.1