p6doc -h|--help shows a useful USAGE message

kalkin · kalkin · commit f4aa4a2ff2b2 · 2016-12-31T04:58:36.000+01:00
diff --git a/bin/p6doc b/bin/p6doc
@@ -70,8 +70,7 @@ sub show-docs(Str $path, :$section, :$no-pager) {
     shell $doc-command-str;
 }
 
-multi sub MAIN() {
-
+sub USAGE() {
     say 'What documentation do you want to read?';
     say "Examples: $PROGRAM-NAME Str";
     say "          $PROGRAM-NAME Str.split";

Original file line number	Diff line number	Diff line change
`@@ -70,8 +70,7 @@ sub show-docs(Str $path, :$section, :$no-pager) {`
`70`	`70`	`shell $doc-command-str;`
`71`	`71`	`}`
`72`	`72`
`73`		`-multi sub MAIN() {`
`74`		`-`
	`73`	`+sub USAGE() {`
`75`	`74`	`say 'What documentation do you want to read?';`
`76`	`75`	`say "Examples: $PROGRAM-NAME Str";`
`77`	`76`	`say " $PROGRAM-NAME Str.split";`