X-Git-Url: https://git.madduck.net/code/myrepos.git/blobdiff_plain/0b9d48697246b7880e52dcfa6d1555d787dd393c..e821ea993dbbf8369632f6a172b919dd7247b60e:/webcheckout?ds=sidebyside

diff --git a/webcheckout b/webcheckout
index d94ad97..e48d9de 100755
--- a/webcheckout
+++ b/webcheckout
@@ -47,13 +47,21 @@ may still be noisy however.)
 
 =back
 
+=head1 PREREQUISITES
+
+To use this program you will need lots of VCS programs installed,
+obviously. It also depends on the perl LWP and HTML::Parser modules.
+
+If the perl URI module is installed, webcheckout can heuristically guess
+what you mean by partial URLs, such as "kitenet.net/~joey"'
+
 =head1 AUTHOR
 
 Copyright 2009 Joey Hess <joey@kitenet.net>
 
 Licensed under the GNU GPL version 2 or higher.
 
-This program is included in mr <http://kitenet.net/~joey/code/mr/>
+This program is included in myrepos <http://myrepos.branchable.com/>
 
 =cut
 
@@ -111,6 +119,11 @@ sub getopts {
 	$url=shift @ARGV;
 	$destdir=shift @ARGV;
 
+	eval q{use URI::Heuristic};
+	if (! $@) {
+		$url=URI::Heuristic::uf_uristr($url);
+	}
+
 	if ($noact) {
 		$quiet=0;
 	}