# HG changeset patch
# User Carl Byington <carl@five-ten-sg.com>
# Date 1201982952 28800
# Node ID d1ef12ab18b6071f0fc5b9cdc222c72bd0a07ec2
# Parent  fbcf2733fe7962f18664e07bdd6207f6a1c7b51b
check for uncommitted changes, and for pending push changesets

diff -r fbcf2733fe79 -r d1ef12ab18b6 package
--- a/package	Sat Feb 02 11:58:46 2008 -0800
+++ b/package	Sat Feb 02 12:09:12 2008 -0800
@@ -2,6 +2,21 @@
 
 find . -name '*~' | while read a; do rm -f "$a"; done
 
+# check for uncommitted changes
+a=$(hg status)
+if [ -n "$a" ]; then
+    hg status
+    echo "fix those first with 'hg commit'"
+    exit 0
+fi
+
+# check for changesets pending push to global repository
+hg outgoing /usr/hg*/dnsbl | grep 'no changes found' >/dev/null
+if [ $? -ne 0 ]; then
+    hg outgoing /usr/hg*/dnsbl
+    echo "fix those first with 'hg push /usr/hg*/dnsbl'"
+    exit 0
+fi
 
 # get a new clean copy from source control
 orig=$(pwd)