[bongo-patches] Don't choose nonexistent backends in `bongo-backend-for-file'

[Daniel Brockman]

Don't choose nonexistent backends in `bongo-backend-for-file'.

diff -rN -u old-bongo/bongo.el new-bongo/bongo.el
--- old-bongo/bongo.el  2007-04-30 16:33:23.000000000 +0200
+++ new-bongo/bongo.el  2007-04-30 16:33:23.000000000 +0200
@@ -4619,7 +4619,8 @@
   (let ((backend-name nil))
     (let ((matchers (bongo-backend-matchers)))
       (while (and matchers (null backend-name))
-        (if (bongo-file-name-matches-p file-name (cdar matchers))
+        (if (and (bongo-file-name-matches-p file-name (cdar matchers))
+                 (bongo-backend (caar matchers)))
             (setq backend-name (caar matchers))
           (setq matchers (cdr matchers)))))
     (unless (eq backend-name 'ignore)

-- 
Daniel Brockman <address@hidden>