--- jablicator-orig-1.0.7	2004-05-10 00:58:38.000000000 -0700
+++ jmyjablicator	2006-04-17 01:05:04.000000000 -0700
@@ -34,14 +34,15 @@
 
 # Handle command line arguments
 parse_command_line() {
-    if [ "$1" = "--versions" ]
-    then
-	VERSIONS="TRUE"
-    elif [ "$1" ]
-    then
-	echo "Usage: jablicator [--versions]"
-	exit 1
-    fi
+    while [ $# -ge 1 ]; do
+        case $1 in 
+        --versions)	VERSIONS="TRUE" ;;
+        -r)		shift; ROOT=$1 ;;
+        *)		echo "Usage: jablicator [--versions]"
+        		exit 1 ;;
+        esac
+        shift
+    done
 }
 
 # Guess at maintainer email
@@ -79,7 +80,7 @@
 # Record apt-get sources
 sources ()
 {
-    cat /etc/apt/sources.list | sed 's/\#.*$//g' | grep deb
+    cat $ROOT/etc/apt/sources.list | sed 's/\#.*$//g' | grep deb
 }
 
 # Packages that are installed
@@ -90,7 +91,7 @@
     # this in detail, but I think grep-dctrl is at the right abstraction
     # level.
     grep-dctrl -v --field Priority required  --exact-match \
-	/var/lib/dpkg/status |\
+	$ROOT/var/lib/dpkg/status |\
 	grep-dctrl    --field Status "install ok installed" --exact-match |\
 	grep-dctrl -v --field Package xfonts \
 	--no-field-names --show-field $1
@@ -101,7 +102,7 @@
 {
     # Very annoying workaround for Debian bug #234657; I want to say -r .
     grep-dctrl --no-field-names --show-field Package . \
-        /var/lib/apt/lists/*Packages | sort -u
+        $ROOT/var/lib/apt/lists/*Packages | sort -u
 }
 
 # Packages installed + packages available