[bongo-patches] Only use overlay arrows if `overlay-arrow-variable-list' is bound

[Daniel Brockman]

Wed Dec 27 16:39:25 CET 2006  Daniel Brockman <address@hidden>

 * Only use overlay arrows if `overlay-arrow-variable-list'
   is bound.

diff -rN -u old-bongo/bongo.el new-bongo/bongo.el
--- old-bongo/bongo.el  2006-12-29 11:21:02.000000000 +0100
+++ new-bongo/bongo.el  2006-12-29 11:21:02.000000000 +0100
@@ -7340,14 +7340,15 @@
           (* 2 (aref (font-info (face-font 'fringe)) 2))))
   (setq bongo-queued-track-marker (make-marker))
   (setq bongo-queued-track-arrow-marker (make-marker))
-  (add-to-list 'overlay-arrow-variable-list
-    'bongo-stopped-track-marker)
-  (add-to-list 'overlay-arrow-variable-list
-    'bongo-playing-track-marker)
-  (add-to-list 'overlay-arrow-variable-list
-    'bongo-paused-track-marker)
-  (add-to-list 'overlay-arrow-variable-list
-    'bongo-queued-track-arrow-marker))
+  (when (boundp 'overlay-arrow-variable-list)
+    (add-to-list 'overlay-arrow-variable-list
+      'bongo-stopped-track-marker)
+    (add-to-list 'overlay-arrow-variable-list
+      'bongo-playing-track-marker)
+    (add-to-list 'overlay-arrow-variable-list
+      'bongo-paused-track-marker)
+    (add-to-list 'overlay-arrow-variable-list
+      'bongo-queued-track-arrow-marker)))
 
 (defvar bongo-library-buffer nil
   "The default Bongo library buffer, or nil.

-- 
Daniel Brockman <address@hidden>