[bongo-patches] Add user option `bongo-display-track-lengths'

[Daniel Brockman]

Add user option `bongo-display-track-lengths'.

diff -rN -u old-bongo/bongo.el new-bongo/bongo.el
--- old-bongo/bongo.el  2007-04-26 04:30:01.000000000 +0200
+++ new-bongo/bongo.el  2007-04-26 04:30:01.000000000 +0200
@@ -585,8 +585,15 @@
 (when (stringp bongo-album-format)
   (message "Warning: `bongo-album-format' should not be a string"))
 
+(defcustom bongo-display-track-lengths t
+  "Whether to display track lengths in Bongo playlist buffers.
+See also `bongo-track-length-column'."
+  :type 'boolean
+  :group 'bongo-display)
+
 (defcustom bongo-track-length-column 60
-  "Column at which to align track lengths in Bongo playlist buffers."
+  "Column at which to align track lengths in Bongo playlist buffers.
+See also `bongo-display-track-lengths'."
   :type 'integer
   :group 'bongo-display)
 
@@ -594,7 +601,9 @@
   '((when bongo-index
       (concat bongo-index ". "))
     bongo-title
-    (when (and bongo-length (bongo-playlist-buffer-p bongo-target))
+    (when (and bongo-display-track-lengths
+               bongo-length
+               (bongo-playlist-buffer-p bongo-target))
       (concat (let ((other-fields-width
                      (with-temp-buffer
                        (insert (bongo-format-infoset

-- 
Daniel Brockman <address@hidden>