Added fvwm music menu script

diff --git a/fvwm/fvwm-menu-music b/fvwm/fvwm-menu-music
new file mode 100755 (executable)
index 0000000..c64e561
--- /dev/null
+++ b/fvwm/fvwm-menu-music
@@ -0,0 +1,47 @@
+#!/bin/sh
+# Author: Tim Pope
+# Belongs in "$HOME/.fvwm/fvwm-menu-music"
+
+cd "$HOME/media/music"
+
+cd "$1"
+menu="`echo $1|sed -e 's/"/\\\\"/g'`"
+
+echo "DestroyMenu recreate \"$menu\""
+echo "AddToMenu \"$menu\""
+echo "+ DynamicPopDownAction DestroyMenu \"$menu\""
+echo "+ MissingSubMenuFunction FuncMenuMusic"
+
+icontitle=48x48-gnome/folder-open.xpm
+[ -f ".icontitle.png" ] && icontitle="$1/.icontitle.png"
+[ -f "../.`basename $1`.png" ] && icontitle="`dirname $1`/.`basename $1`.png"
+[ -f "../.`basename $1`.xpm" ] && icontitle="`dirname $1`/.`basename $1`.xpm"
+[ -f ".title.png" ] && icontitle="$1/.title.png"
+[ -f ".title.xpm" ] && icontitle="$1/.title.xpm"
+echo "+ \"*$icontitle*\" FuncMusicPlay \"$menu\""
+echo "+ \"\" Nop"
+
+/bin/ls -1|while read fn; do
+    fs="`echo $fn|sed -e 's/"/\\\\"/g'`"
+    #fd="`echo $1/$fn|sed -e 's/"/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"/g'`"
+    fe="`echo $1/$fn|sed -e 's/"/\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"/g'`"
+    if [ -d "$fn" ]; then
+       icontitle=menu/folder.xpm
+       #[ -f "$fn/.icontitle.png" ] && icontitle="$1/$fn/.icontitle.png"
+       [ -f "$fn/.title.png" ] && icontitle="$menu/$fs/.title.png"
+       [ -f "$fn/.title.xpm" ] && icontitle="$menu/$fs/.title.xpm"
+       [ -f "$1/.$fn.png" ] && icontitle="$menu/.$fe.png"
+       [ -f "$1/.$fn.xpm" ] && icontitle="$menu/.$fs.xpm"
+       echo "+ \"%$icontitle%`echo $fs|sed -e 's/_/ /g'`\" Popup \"$menu/$fs\""
+    else
+       case "$fn" in
+       *.jpg|*.png|*.xpm|*.txt) ;;
+       *.ogg|*.mp3|*.wav)
+           icontitle=menu/file.xpm
+           [ -f ".$fn.png" ] && icontitle= "$menu/.$fs.png"
+           [ -f ".$fn.xpm" ] && icontitle= "$menu/.$fs.xpm"
+           echo "+ \"%$icontitle%`echo $fs|sed -e 's/_/ /g' -e 's/\....$//'`\" FuncMusicPlay \"$fe\""
+       ;;
+    esac
+    fi
+done