tm 6.71
[elisp/tm.git] / methods / tm-au
1 #!/bin/sh
2 if [ "$TM_TMP_DIR" = "" ]; then
3         TM_TMP_DIR=/tmp
4         export TM_TMP_DIR
5 fi
6
7 case "$4" in
8 "play")
9         filename = /dev/audio
10         ;;
11 "extract")
12         if [ "$5" = "" ]; then
13                 filename="$TM_TMP_DIR/mime$$.au"
14         else
15                 filename="$TM_TMP_DIR/$5"
16         fi
17         ;;
18 esac
19
20 echo "$2; $3 -> $filename"
21
22 tmdecode $3 $1 $filename