X-Git-Url: https://pd.if.org/git/?a=blobdiff_plain;f=zpm-rmpackage;fp=zpm-rmpackage;h=0000000000000000000000000000000000000000;hb=0419c62f964b259df1c1816f5870ef62eb97ed7c;hp=98eac6ee48b53f75a21738df9961377e2054dafc;hpb=0c2216d1e0dc8565a6bf61c9572e47bb1ae1c1fb;p=zpackage

diff --git a/zpm-rmpackage b/zpm-rmpackage
deleted file mode 100755
index 98eac6e..0000000
--- a/zpm-rmpackage
+++ /dev/null
@@ -1,57 +0,0 @@
-#!/bin/sh
-
-pkgfile=${ZPM_PACKAGE_FILE:-${ZPMDB:-/var/lib/zpm/local.db}}
-
-verbose=0
-
-# newpackage -f pkgfile $pkgid
-while getopts :f:vm:s:S: opt; do
-	case $opt in
-		f) pkgfile="$OPTARG" ;;
-		v) verbose=1 ;;
-		m) message="$OPTARG" ;;
-		s) status="$status -s $OPTARG" ;;
-		S) exclude="$exclude -S $OPTARG" ;;
-	esac
-done
-shift $(( OPTIND - 1))
-
-if [ -z "$message" ]; then
-	message=null
-else
-	message=$(zpm quote -q "$message")
-fi
-
-die() {
-	echo $* 1>&2
-	exit 1
-}
-
-warn() {
-	echo $* 1>&2
-}
-
-if [ ! -f "$pkgfile" ]; then
-	die $pkgfile does not exist
-fi
-
-{
-	printf ".bail on\n"
-	printf ".echo on\n"
-	printf "begin;\n"
-	for pkgstr in "$@"; do
-		pkgid=$(zpm findpkg $status $exclude -f $pkgfile "$pkgstr")
-		if [ -z "$pkgid" ]; then
-			continue;
-		fi
-		if [ $verbose -gt 0 ]; then
-			if [ $verbose -gt 1 ]; then
-				warn "found %s -> %s\n" "$pkgstr", "$pkgid"
-			fi
-		fi
-		pkgid=$(zpm quote "$pkgid")
-		printf "delete from packages_pkgid where pkgid = '$pkgid';\n"
-		printf "insert into zpmlog (action, target, info) values ('rmpackage','%s',%s);\n" "$pkgid" "$message"
-	done
-	printf "commit;\n"
-} | zpm shell $pkgfile