Here's an additional patch to fix byte-compilation under Emacs 21:
(`whitespace' was added in Emacs 22 as an alias to `space').
--- old-Bongo/bongo.el 2006-12-31 17:43:24.000000000 +0100
+++ new-Bongo/bongo.el 2006-12-31 17:43:24.000000000 +0100
@@ -4375,11 +4375,11 @@ These will come at the end or right befo
((looking-at (eval-when-compile
(rx (and line-start
"status change:"
- (zero-or-more (or whitespace "("))
+ (zero-or-more (or space "("))
"play state:"
- (zero-or-more whitespace)
+ (zero-or-more space)
(submatch (one-or-more digit))
- (zero-or-more (or whitespace ")"))
+ (zero-or-more (or space ")"))
line-end))))
(case (string-to-number (match-string 1))
(1 (bongo-player-put player 'paused nil)
@@ -4392,14 +4392,14 @@ These will come at the end or right befo
(rx (and line-start
(optional
(and "[" (zero-or-more digit) "]"))
- (zero-or-more whitespace)
+ (zero-or-more space)
"main playlist: nothing to play"
line-end))))
(process-send-string process "quit\n"))
((looking-at (eval-when-compile
(rx (and line-start
(submatch (one-or-more digit))
- (zero-or-more whitespace)
+ (zero-or-more space)
line-end))))
(when (bongo-player-get player 'pending-queries)
(let ((value (string-to-number (match-string 1))))
--
Romain Francoise <[EMAIL PROTECTED]> | The sea! the sea! the open
it's a miracle -- http://orebokech.com/ | sea! The blue, the fresh, the
| ever free! --Bryan W. Procter
_______________________________________________
bongo-devel mailing list
[email protected]
http://lists.nongnu.org/mailman/listinfo/bongo-devel
