;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\301\302!\210\303\300\304\305\306\307\310\311&\210\312\313\314\315\316DD\317\320\321%\210\312\322\314\315\323DD\324\320\325%\210\312\300\314\315\326DD\327\320\330%\210\331\332\333\334\335\336\337\340\341\342\343\344\345\346\347\350\351\352\353\354\355\356\357&P#\210\331\360\361#\210\331\362\363#\207" [emms-player-xine require emms-player-simple custom-declare-group nil "EMMS player for xine." :group emms-player :prefix "emms-player-xine-" custom-declare-variable emms-player-xine-command-name funcall function #[0 "\300\207" [#1="xine"] 1 #1#] "The command name of xine." :type string emms-player-xine-parameters #[0 "\300\207" [("--no-gui" "--no-logo" "--no-splash" "--no-reload" "--stdctl")] 1] "The arguments to `emms-player-xine-command-name'." (repeat string) #[0 "\300\301\302\303#\207" [emms-player emms-player-xine-start emms-player-xine-stop emms-player-xine-playable-p] 4] "A player for EMMS." (cons symbol alist) emms-player-set regex "\\`\\(http[s]?\\|mms\\)://\\|" emms-player-simple-regexp "ogg" "mp3" "wav" "mpg" "mpeg" "wmv" "wma" "mov" "avi" "divx" "ogm" "ogv" "asf" "mkv" "rm" "rmvb" "mp4" "flac" "vob" pause emms-player-simple-pause resume emms-player-simple-resume] 24) #@39 Start the player process. (fn TRACK) (defalias 'emms-player-xine-start #[257 "\303\304! \n$\207" [emms-player-xine emms-player-xine-command-name emms-player-xine-parameters emms-player-simple-start emms-track-name] 6 (#$ . 1298)]) #@26 Stop the player process. (defalias 'emms-player-xine-stop #[0 "\300 \207" [emms-player-simple-stop] 1 (#$ . 1538)]) #@57 Return non-nil when we can play this track. (fn TRACK) (defalias 'emms-player-xine-playable-p #[257 "\302!\205\303!\304>\205\305\306 \307\"\310!\"\207" [emms-player-xine-command-name emms-player-xine executable-find emms-track-type (file url) string-match emms-player-get regex emms-track-name] 5 (#$ . 1660)]) (byte-code "\301\302\303#\210\301\304\305#\210\301\306\307#\207" [emms-player-xine emms-player-set pause emms-player-xine-pause resume nil seek emms-player-xine-seek] 4) #@34 Depends on xine's --stdctl mode. (defalias 'emms-player-xine-pause #[0 "\301\302\"\207" [emms-player-simple-process-name process-send-string "pause\n"] 3 (#$ . 2158)]) #@45 Depends on xine's --stdctl mode. (fn SECS) (defalias 'emms-player-xine-seek #[257 "\301\302\"\211U\204\303\304\"\210\305\306W\203\307\310\"\202\"\307\311\"\"\207" [emms-player-simple-process-name emms-nearest-value (-60 -30 -15 -7 7 15 30 60) message "EMMS: Xine only supports seeking for [+/-] 7/15/30/60 seconds, so we seeked %d seconds" process-send-string 0 format "SeekRelative%d\n" "SeekRelative+%d\n"] 7 (#$ . 2333)]) #@103 Returns the value of LIST which is nearest to VAL. LIST should be a list of integers. (fn VAL LIST) (defalias 'emms-nearest-value #[514 "\211@\300Z!A\211\203)\211@\300Z!\211W\203!\262\211\262\210A\266\202\202 \210\207" [abs] 9 (#$ . 2778)]) (provide 'emms-player-xine)