From 6efac1a12c8ab0b7d96a8d342fbd74fce35e8c42 Mon Sep 17 00:00:00 2001 From: Vasil Zlatanov Date: Tue, 18 Aug 2015 02:38:33 +0200 Subject: Organise everything systematically. --- config/uzbl/scripts/download.sh | 69 ----------------------------------------- config/uzbl/scripts/gonew.pl | 16 ---------- config/uzbl/scripts/goto.pl | 16 ---------- config/uzbl/scripts/gowiki.pl | 16 ---------- config/uzbl/scripts/gowikio.pl | 16 ---------- config/uzbl/scripts/youtube.pl | 4 --- 6 files changed, 137 deletions(-) delete mode 100755 config/uzbl/scripts/download.sh delete mode 100755 config/uzbl/scripts/gonew.pl delete mode 100755 config/uzbl/scripts/goto.pl delete mode 100755 config/uzbl/scripts/gowiki.pl delete mode 100755 config/uzbl/scripts/gowikio.pl delete mode 100755 config/uzbl/scripts/youtube.pl (limited to 'config/uzbl/scripts') diff --git a/config/uzbl/scripts/download.sh b/config/uzbl/scripts/download.sh deleted file mode 100755 index 398f271..0000000 --- a/config/uzbl/scripts/download.sh +++ /dev/null @@ -1,69 +0,0 @@ -#!/bin/sh -# uzbl's example configuration sets this script up as its download_handler. -# this script is run when uzbl encounters a URL that it can't display, and when -# a download is requested using the 'download' command. -# -# if the script prints a file path to stdout, uzbl will save the download to -# that path using it's internal downloader. -# -# if nothing is printed to stdout, the internal download will be cancelled. -# you could do your own download handling in your script that way. - -# if $5 is set, it is the path that was passed to uzbl's "download" command. -# we want to use that if it's available. -[ -n "$5" ] && echo "$5" && exit - -. "$UZBL_UTIL_DIR/uzbl-dir.sh" - -# the URL that is being downloaded -uri="$1" -shift - -safe_uri="$( echo "$uri" | sed -e 's/\W/-/g' )" - -# a filename suggested by the server or based on the URL -suggested_filename="${1:-$safe_uri}" -shift - -# the mimetype of the file being downloaded -content_type="$1" -shift - -# the size of the downloaded file in bytes. this is not always accurate, since -# the server might not have sent a size with its response headers. -total_size="$1" -shift - -case "$suggested_filename" in - # example: save torrents to a separate directory - *.torrent) - path="/home/vasko/Torrents/$suggested_filename" - ;; - # Default case - *) - path="/home/vasko/Downloads/$suggested_filename" - ;; -esac - -source ~/.colors; - -if ! /home/vasko/.ratpoison/ratmenu -style dreary -fg \"$COLOR11\" -bg \"$COLOR0\" -io 2 "Download \"$suggested_filename\"?" false Yes true No false;then -path=''; -fi - -# Do nothing if we don't want to save the file -[ -z "$path" ] && exit 0 - -# Check if the file exists -if [ ! -e "$path" ]; then - echo "$path" - exit 0 -fi - -# Try to make a unique filename -count=1 -while [ -e "$path.$count" ]; do - count=$(( $count + 1 )) -done - -echo "$path.$count" diff --git a/config/uzbl/scripts/gonew.pl b/config/uzbl/scripts/gonew.pl deleted file mode 100755 index 33dac82..0000000 --- a/config/uzbl/scripts/gonew.pl +++ /dev/null @@ -1,16 +0,0 @@ -#!/usr/bin/perl - -my @cmd = @ARGV; -my $fifo = $ENV{'UZBL_FIFO'}; - - -#If there are no dots in the first word or more than one word is suppllied expect a phrase for google. Else go to the uri specified. -if (index(@cmd[0], '.') == -1 || scalar @cmd > 1) -{ - # Replace this with your search engine - qx(uzbl-browser --uri "https://encrypted.google.com/search?q=@ARGV&hl=en"); -} -else -{ - qx(uzbl-browser --uri @cmd"); -} diff --git a/config/uzbl/scripts/goto.pl b/config/uzbl/scripts/goto.pl deleted file mode 100755 index b1630d4..0000000 --- a/config/uzbl/scripts/goto.pl +++ /dev/null @@ -1,16 +0,0 @@ -#!/usr/bin/perl - -my @cmd = @ARGV; -my $fifo = $ENV{'UZBL_FIFO'}; - - -#If there are no dots in the first word or more than one word is suppllied expect a phrase for google. Else go to the uri specified. -if (index(@cmd[0], '.') == -1 || scalar @cmd > 1) -{ - # Replace this with your search engine - qx(echo "uri https://encrypted.google.com/search?q=@ARGV&hl=en" >> $fifo); -} -else -{ - qx(echo "uri @cmd" >> $fifo); -} diff --git a/config/uzbl/scripts/gowiki.pl b/config/uzbl/scripts/gowiki.pl deleted file mode 100755 index 61f636d..0000000 --- a/config/uzbl/scripts/gowiki.pl +++ /dev/null @@ -1,16 +0,0 @@ -#!/usr/bin/perl - -my @cmd = @ARGV; -my $fifo = $ENV{'UZBL_FIFO'}; - - -#If there are no dots in the first word or more than one word is suppllied expect a phrase for google. Else go to the uri specified. -if (index(@cmd[0], '.') == -1 || scalar @cmd > 1) -{ - # Replace this with your search engine - qx(echo "uri http://127.0.0.1:8000/search?content=wikipedia_en_all_nopic_01_2014&pattern=@ARGV" >> $fifo); -} -else -{ - qx(echo "uri @cmd" >> $fifo); -} diff --git a/config/uzbl/scripts/gowikio.pl b/config/uzbl/scripts/gowikio.pl deleted file mode 100755 index 743c69c..0000000 --- a/config/uzbl/scripts/gowikio.pl +++ /dev/null @@ -1,16 +0,0 @@ -#!/usr/bin/perl - -my @cmd = @ARGV; -my $fifo = $ENV{'UZBL_FIFO'}; - - -#If there are no dots in the first word or more than one word is suppllied expect a phrase for google. Else go to the uri specified. -if (index(@cmd[0], '.') == -1 || scalar @cmd > 1) -{ - # Replace this with your search engine - qx(echo "uri http://en.wikipedia.org/w/index.php?search=@ARGV" >> $fifo); -} -else -{ - qx(echo "uri @cmd" >> $fifo); -} diff --git a/config/uzbl/scripts/youtube.pl b/config/uzbl/scripts/youtube.pl deleted file mode 100755 index 5a0e99a..0000000 --- a/config/uzbl/scripts/youtube.pl +++ /dev/null @@ -1,4 +0,0 @@ -#!/usr/bin/env perl -my $url = $ENV{'UZBL_URI'}; -exec "mpv '$url'" - -- cgit v1.2.3-54-g00ecf