From 208044f6df0c96014a8fd33a837b3cf22c060746 Mon Sep 17 00:00:00 2001
From: Nathan Wagner <nw@hydaspes.if.org>
Date: Sat, 24 Nov 2018 01:24:17 +0000
Subject: [PATCH] show sql for failed shell

---
 zpm-list | 13 ++++++++++---
 1 file changed, 10 insertions(+), 3 deletions(-)

diff --git a/zpm-list b/zpm-list
index 2de524b..c10ace4 100755
--- a/zpm-list
+++ b/zpm-list
@@ -4,13 +4,16 @@
 
 verbose=0
 nameonly=0
+latestonly=1
 
-while getopts :s:f:vn opt; do
+while getopts :s:f:vnI opt; do
 	case $opt in
 		f) pkgfile="$OPTARG" ;;
 		s) status="$OPTARG" ;;
+		I) status=installed ;;
 		v) verbose=1 ;;
 		n) nameonly=1 ;;
+		a) latestonly=0 ;;
 	esac
 done
 shift $(( OPTIND - 1))
@@ -34,7 +37,7 @@ fi
 
 if [ -n "$status" ]; then
 	status=$(zpm quote "$status")
-	where="where status = '$status'"
+	where="and status = '$status'"
 fi
 
 pkgid=$1
@@ -57,6 +60,10 @@ fi
 
 zpm shell $pkgfile <<EOS
 .separator "\t"
-select $cols from packages_pkgid $where
+select $cols from packages_pkgid where true $where
 ;
 EOS
+
+if [ $? -ne 0 ]; then
+	echo "select $cols from packages_pkgid where true $where" 1>&2
+fi
-- 
2.40.0