[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[bongo-patches] Add `S-<up>' and `S-<down>' bindings for changing the vo
From: |
Daniel Brockman |
Subject: |
[bongo-patches] Add `S-<up>' and `S-<down>' bindings for changing the volume |
Date: |
Thu, 24 May 2007 13:26:44 +0200 |
User-agent: |
Gnus/5.11 (Gnus v5.11) Emacs/22.0.92 (gnu/linux) |
Add `S-<up>' and `S-<down>' bindings for changing the volume.
diff -rN -u old-bongo/bongo.el new-bongo/bongo.el
--- old-bongo/bongo.el 2007-05-24 13:26:25.000000000 +0200
+++ new-bongo/bongo.el 2007-05-24 13:26:25.000000000 +0200
@@ -9859,10 +9859,17 @@
(define-key map "%T" 'bongo-unmark-by-track-title-regexp)
(define-key map "r" 'bongo-rename-line)
(define-key map "d" 'bongo-dired-line)
- (when (require 'volume nil t)
- (if bongo-xmms-refugee-mode
- (define-key map "V" 'volume)
- (define-key map "v" 'volume)))
+ (if bongo-xmms-refugee-mode
+ (define-key map "V" 'volume)
+ (define-key map "v" 'volume))
+ (define-key map [(shift up)] 'volume-raise)
+ (define-key map [(control shift up)] 'volume-raise-10)
+ (define-key map [(meta shift up)] 'volume-raise-10)
+ (define-key map [(control meta shift up)] 'volume-raise-50)
+ (define-key map [(shift down)] 'volume-lower)
+ (define-key map [(control shift down)] 'volume-lower-10)
+ (define-key map [(meta shift down)] 'volume-lower-10)
+ (define-key map [(control meta shift down)] 'volume-lower-50)
(when bongo-xmms-refugee-mode
(define-key map "z" 'bongo-previous)
(define-key map "x" 'bongo-start)
--
Daniel Brockman <address@hidden>
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [bongo-patches] Add `S-<up>' and `S-<down>' bindings for changing the volume,
Daniel Brockman <=