show sql for failed shell

diff --git a/zpm-list b/zpm-list
index 2de524b0e89c0e64c9162970deb1103b020e4b39..c10ace4ec1028b641fa25b95c3a022f89d5b8e4f 100755 (executable)
--- 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