Commits

jpw  committed 9c2d66e

* ibuffer.el (ibuffer-always-compile-formats): change default value.
(ibuffer-compile-formats-quieten-log): change default value to nil.
(ibuffer-compile-format): remove spurious reference to pt.

  • Participants
  • Parent commits ca235fa

Comments (0)

Files changed (2)

+2002-02-21  John Paul Wallington  <jpw@xemacs.org>
+
+	* ibuffer.el (ibuffer-always-compile-formats): change default value.
+	(ibuffer-compile-formats-quieten-log): change default value to nil.
+	(ibuffer-compile-format): remove spurious reference to pt.
+	
 2002-02-21  John Paul Wallington  <jpw@xemacs.org>
 
 	* ibuffer.el (ibuffer-track-buffers): new function.
 	(ibuffer-mode-filter-menu): ditto.
 	(ibuffer-customize): new function.
 	(ibuffer-shrink-to-fit): use shrink-window-if-larger-than-buffer.
-	(ibuffer-compile-format): comment out pt.  Kludge.
+	(ibuffer-compile-format): comment out pt.
 	(ibuffer-insert-buffers-and-marks): don't bind after-change-functions
 	to nil.
 	(ibuffer-mode): use ibuffer-truncate-lines.  Make fontification work.
   :type '(repeat sexp)
   :group 'ibuffer)
 
-(defcustom ibuffer-always-compile-formats nil
+(defcustom ibuffer-always-compile-formats (featurep 'bytecomp)
   "If non-nil, then use the byte-compiler to optimize `ibuffer-formats'.
 This will increase the redisplay speed, at the cost of loading the
 elisp byte-compiler."
   :type 'boolean
   :group 'ibuffer)
 
-(defcustom ibuffer-compile-formats-quieten-log t
+(defcustom ibuffer-compile-formats-quieten-log nil
   "If non-nil, quieten byte-compiler's log when optimizing `ibuffer-formats'."
   :type 'boolean
   :group 'ibuffer)
 			 #'byte-compile
 		       #'identity)
 		     (nconc (list 'lambda '(buffer mark))
-			    `((let ,(append '(pt) ;FIXME
+			    `((let ,(append
 				     (when str-used
 				       '(str))
 				     (when global-strlen-used