bongo-patches
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[bongo-patches] Make `bongo-mark-track-lines-satisfying' only consider t


From: Daniel Brockman
Subject: [bongo-patches] Make `bongo-mark-track-lines-satisfying' only consider track lines (suggested by Daniel Jensen)
Date: Fri, 06 Apr 2007 18:40:27 +0200
User-agent: Gnus/5.11 (Gnus v5.11) Emacs/22.0.92 (gnu/linux)

2007-04-06  Daniel Brockman  <address@hidden>

        Make `bongo-mark-track-lines-satisfying' only consider track lines
        (suggested by Daniel Jensen).

diff -rN -u old-bongo/bongo.el new-bongo/bongo.el
--- old-bongo/bongo.el  2007-04-06 18:40:25.000000000 +0200
+++ new-bongo/bongo.el  2007-04-06 18:40:25.000000000 +0200
@@ -3696,10 +3696,10 @@
       (goto-char (point-min))
       (while (and (not (eobp))
                   (bongo-snap-to-object-line 'no-error))
-        (unless (bongo-marked-track-line-p)
-          (when (funcall predicate)
-            (bongo-mark-line)
-            (setq count (+ count 1))))
+        (when (and (bongo-unmarked-track-line-p)
+                   (funcall predicate))
+          (bongo-mark-line)
+          (setq count (+ count 1)))
         (goto-char (bongo-point-after-line))))
     count))
 
-- 
Daniel Brockman <address@hidden>

reply via email to

[Prev in Thread] Current Thread [Next in Thread]