bongo-patches
[Top][All Lists]
Advanced

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

[bongo-patches] Add some missing bindings to `bongo-seek-mode-map'


From: Daniel Brockman
Subject: [bongo-patches] Add some missing bindings to `bongo-seek-mode-map'
Date: Sun, 06 May 2007 23:33:22 +0200
User-agent: Gnus/5.11 (Gnus v5.11) Emacs/22.0.92 (gnu/linux)

Add some missing bindings to `bongo-seek-mode-map'.

diff -rN -u old-bongo/bongo.el new-bongo/bongo.el
--- old-bongo/bongo.el  2007-05-06 23:33:21.000000000 +0200
+++ new-bongo/bongo.el  2007-05-06 23:33:21.000000000 +0200
@@ -7386,6 +7386,8 @@
     (define-key map [right] 'bongo-seek-forward-3)
     (define-key map "\M-b" 'bongo-seek-backward-10)
     (define-key map "\M-f" 'bongo-seek-forward-10)
+    (define-key map "\M-B" 'bongo-seek-backward-10)
+    (define-key map "\M-F" 'bongo-seek-forward-10)
     (define-key map [(control left)] 'bongo-seek-backward-10)
     (define-key map [(control right)] 'bongo-seek-forward-10)
     (define-key map [(meta left)] 'bongo-seek-backward-10)
@@ -7398,6 +7400,8 @@
     (define-key map [(meta down)] 'bongo-seek-backward-60)
     (define-key map "\M-\C-b" 'bongo-seek-backward-60)
     (define-key map "\M-\C-f" 'bongo-seek-forward-60)
+    (define-key map [?\C-\M-\S-b] 'bongo-seek-backward-60)
+    (define-key map [?\C-\M-\S-f] 'bongo-seek-forward-60)
     (define-key map [(control meta left)] 'bongo-seek-backward-60)
     (define-key map [(control meta right)] 'bongo-seek-forward-60)
     (define-key map "a" 'bongo-replay-current)
@@ -7408,6 +7412,8 @@
     (define-key map [end] 'bongo-play-next)
     (define-key map "p" 'bongo-play-previous)
     (define-key map "n" 'bongo-play-next)
+    (define-key map "\C-p" 'bongo-play-previous)
+    (define-key map "\C-n" 'bongo-play-next)
     (define-key map " " 'bongo-pause/resume)
     (define-key map "\C-c\C-a" 'bongo-replay-current)
     (define-key map "\C-c\C-i" 'bongo-perform-next-action)
@@ -7415,6 +7421,7 @@
     (define-key map "\C-c\C-n" 'bongo-play-next)
     (define-key map "\C-c\C-r" 'bongo-play-random)
     (define-key map "\C-c\C-s" 'bongo-start/stop)
+    (define-key map "\C-l" 'bongo-seek-redisplay)
     (define-key map "l" 'bongo-seek-redisplay)
     (define-key map "\C-g" 'bongo-seek-quit)
     (define-key map "\C-m" 'bongo-seek-quit)
-- 
Daniel Brockman <address@hidden>

reply via email to

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