summaryrefslogtreecommitdiff
path: root/cam/gen-cam-menu
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2018-11-04 16:06:20 +0100
committerDaniel Friesel <derf@finalrewind.org>2018-11-04 16:06:20 +0100
commitb13bbbfb3b8306119d86df95c147df62b4f51efe (patch)
treef081390751da78e55fb1eee3309d6eedbcb8c51c /cam/gen-cam-menu
parentebb130d978df17b42935fed570294df45622dea2 (diff)
Remove feh-cam and gen-cam-menu
Diffstat (limited to 'cam/gen-cam-menu')
-rwxr-xr-xcam/gen-cam-menu44
1 files changed, 0 insertions, 44 deletions
diff --git a/cam/gen-cam-menu b/cam/gen-cam-menu
deleted file mode 100755
index 710070b..0000000
--- a/cam/gen-cam-menu
+++ /dev/null
@@ -1,44 +0,0 @@
-#!/bin/sh
-
-######################################################################
-# gen_cam_menu.sh 0.1 #
-# by Paul Duncan <pabs@pablotron.org> #
-# #
-# This script will generate a menu of cam bookmarks for #
-# Enlightenment DR0.16.x. TYou can safely run this script more than #
-# once; it won't add an another entry to the left-click menu if it's #
-# already been run once. It doesn't delete any existing menu #
-# entries, and it backs up your existing menu files as well. (just #
-# in case I screwed up.. hehe). THe two variables below allow you #
-# rename the left-click menuitem, and the menu title. #
-# #
-# #
-MENU_ITEM="Webcams"; #
-MENU_TITLE="Webcam List"; #
-BMARKS=$HOME"/.cam_bookmarks"; #
-# #
-######################################################################
-
-
-C_MENUFILE="webcam.menu";
-F_MENUFILE="file.menu";
-C_MENU=$HOME"/.enlightenment/"$C_MENUFILE;
-F_MENU=$HOME"/.enlightenment/"$F_MENUFILE;
-
-# make backups, just in case
-cp -f $C_MENU $C_MENU"-cam_menu.backup"
-cp -f $F_MENU $F_MENU"-cam_menu.backup"
-
-echo "Note: gen-cam-menu will be removed from the feh distribution by 2013." > /dev/stderr
-echo "Please mail derf@finalrewind.org if you still use it." > /dev/stderr
-
-# generate cam menu
-echo "Generating \""$C_MENU"\".";
-echo "\"$TITLE\"" > "$C_MENU";
-cat $BMARKS | perl -e "while (<>) { /(.*?)=/; \$keys{\$1}=\"1\"; } foreach(sort keys %keys) { /(.)(.*$)/; print \"\\\"\".uc(\$1).\"\$2\\\" NULL exec \\\"feh-cam \$1\$2\\\"\\n\"; }">> $C_MENU;
-
-# add entry to file menu if there isn't one
-echo "Generating \""$F_MENU"\".";
-perl -i -e "\$already_there=0; while (<>) { \$already_there++ if (/$MENU_ITEM/); print \"\\\"$MENU_ITEM\\\" NULL menu \\\"$C_MENUFILE\\\"\\n\" if (!\$already_there&&/Restart/); print; }" $F_MENU;
-
-echo "Done.";