+# Record what type of data is specified
+# Options: -b|--binary, -s|--source, --udeb
+sub record_pkgmode {
+ print "in record_pkgmode\n";
+ $pkg_mode = 'b' if $_[0] eq 'binary';
+ $pkg_mode = 's' if $_[0] eq 'source';
+ $pkg_mode = 'u' if $_[0] eq 'udeb';
+}
+
+