From 2446e103608dc59b04bf561aafc2480e83f09199 Mon Sep 17 00:00:00 2001
From: Pierre Neidhardt <ambrevar@gmail.com>
Date: Tue, 27 Oct 2015 09:29:24 +0100
Subject: [PATCH] scripts: Remove 'currency'

Use GNU units instead.
---
 .scripts/currency | 53 -----------------------------------------------
 1 file changed, 53 deletions(-)
 delete mode 100755 .scripts/currency

diff --git a/.scripts/currency b/.scripts/currency
deleted file mode 100755
index 96ba453d..00000000
--- a/.scripts/currency
+++ /dev/null
@@ -1,53 +0,0 @@
-#!/bin/sh
-
-[ -z "$AGENT" ] && AGENT='curl -sA "Mozilla/5.0"'
-
-if [ "$1" = "-l" ]; then
-	$AGENT 'https://www.google.com/finance/converter' \
-		| awk -F'<|>|"' '/select name=from value/, /\/select/ {if ($5 != "") {sub(/\(.*\)/, "", $5); print $3, $5}}'
-	exit
-fi
-
-usage() {
-	cat <<EOF
-Usage: ${0##*/} IN-CURRENCY OUT-CURRENCY [VALUES...]
-       ${0##*/} -l
-
-Convert VALUES from IN-CURRENCY to OUT-CURRENCY.
-VALUES are read from stdin if not provided.
-
-CURRENCY is a 3-letters code like EUR, SEK, USD, etc.
-See the list of codes with the '-l' option.
-
-The download agent is specified from environment variable AGENT='$AGENT'.
-EOF
-}
-
-if [ $# -lt 2 ]; then
-	usage
-	exit
-fi
-
-change="$($AGENT "http://www.google.com/finance?q=$1$2" | \
-	awk -F '<|>' '/^1 / {print substr($3, 1, index($3, " "))}')"
-
-if [ -z "$change" ]; then
-	usage
-	exit
-fi	
-
-shift 2
-
-mul() {
-	[ -n "$1" ] && [ -n "$2" ] && awk "BEGIN {print $1*$2}"
-}
-
-if [ -z "$1" ]; then
-	while read v; do
-		mul $v $change
-	done
-else
-	for v; do
-		mul $v $change
-	done
-fi