Regular updates

In the course of configuring Emacs there are numerous changes to make.
This is one regular step.

1 files changed, 12 insertions, 3 deletions

diff --git a/bongo.el b/bongo.el
index 623317a..1835973 100644
--- a/bongo.el
+++ b/bongo.el
@@ -21,10 +21,18 @@
   (setq bongo-mode-line-indicator-mode nil)
   (setq bongo-enabled-backends '(mpv))
   (setq bongo-seek-electric-mode nil)
-  (setf bongo-custom-backend-matchers
-        '((mpv local-file "webm" "m4a")))
+  ;; I still don't know how to make bongo automatically play a YouTube
+  ;; link.
+  (setq bongo-custom-backend-matchers
+        '((mpv local-file "webm" "m4a")
+          (mpv "https:" "youtube")))
   (setq-default bongo-next-action 'durand-bongo-play-next-or-first)
 
+  ;; Bongo info path
+
+;;;###autoload
+  (add-to-list 'Info-directory-list (expand-file-name "bongo/" package-dir))
+
 ;;;###autoload
   (defvar durand-bongo-music-dir nil
     "Directories to store my songs.
@@ -53,6 +61,7 @@ This is used since my music directories used to contain symbolic links.")
               ;;          collect attr)
 	      ))
 
+  (define-key global-map (vector ?\C-c ?b) #'bongo)
   (define-key bongo-playlist-mode-map [?n] #'bongo-next-object-line)
   (define-key bongo-playlist-mode-map [?p] #'bongo-previous-object-line)
   (define-key bongo-playlist-mode-map [?j] #'durand-bongo-save-playlist)
@@ -343,7 +352,7 @@ insert an action track at point."
           (bongo-mark-current-track-line-as-played))
 	(durand-bongo-next-or-first n)
 	(bongo-start)))))
-
+  
 ;;;###autoload
   (defun durand-bongo-previous-or-last (&optional n)
     "Make the previous track current in the nearest playlist buffer.