;ELC ;;; Compiled by heimdall@baldur on Fri Feb 1 18:35:00 2008 ;;; from file /home/heimdall/repos/emms/emms-volume-amixer.el ;;; in Emacs version 23.0.60.1 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. (if (and (boundp 'emacs-version) (< (aref emacs-version (1- (length emacs-version))) ?A) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19.29"))) (error "`emms-volume-amixer.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; #@153 The control to change the volume with. Controls includes "Master", "PCM", etc. For a full list of available controls, run `amixer controls' in a shell. (custom-declare-variable 'emms-volume-amixer-control '"Master" '(#$ . 600) :type '(choice (const :tag "Master" "Master") (const :tag "PCM" "PCM") (string :tag "Something else: ")) :group 'emms-volume) #@40 Change amixer master volume by AMOUNT. (defalias 'emms-volume-amixer-change #[(amount) "\303\304\305\306!\307\216rq\210\310\311\312\313p\313\314 \315\316\317\n!\n\320W\203#\321\202$\322#&!\2056\323\324\313\325#\2056\326\327!+\"\207" [#1=#:temp-buffer emms-volume-amixer-control amount message "Playback channels: %s" generate-new-buffer " *temp*" ((byte-code "\301!\203\n\302!\210\301\207" [#1# buffer-name kill-buffer] 2)) zerop call-process "amixer" nil "sset" format "%d%%%s" abs 0 "-" "+" re-search-backward "\\[\\([0-9]+%\\)\\]" t match-string 1] 15 (#$ . 959)]) (provide 'emms-volume-amixer)