skip pager for tiny perldocs

Sun, 11 Dec 2016 18:57:38 -0500

author
Meredith Howard <mhoward@roomag.org>
date
Sun, 11 Dec 2016 18:57:38 -0500
changeset 446
acd0b08d467e
parent 445
1201037900f5
child 447
8ef69d160a72

skip pager for tiny perldocs

bin/git-ctags file | annotate | diff | comparison | revisions
bin/setup-neomutt file | annotate | diff | comparison | revisions
--- a/bin/git-ctags
+++ b/bin/git-ctags
@@ -5,7 +5,7 @@ ctags_cmd    = ENV['CTAGS_CMD']  || 'cta
 
 case ARGV[0]
 when 'help'
-  exec 'perldoc', $0
+  exec 'perldoc', '-T', $0
 when 'hook'
   running_hook = true
 end
--- a/bin/setup-neomutt
+++ b/bin/setup-neomutt
@@ -2,7 +2,7 @@
 set -eu
 
 case ${1:-} in *help|-h)
-  exec perldoc $0;;
+  exec perldoc -T $0;;
 esac
 
 cd
@@ -38,15 +38,15 @@ for BIN in mutt mutt_dotlock pgpewrap; d
   ln -sf ../sandbox/neomutt/$BIN
 done
 
-
 :<<=cut
 =head1 NAME
 
-setup-neomutt - clone/update, build, and link neomutt
+setup-neomutt - Clone/update and build neomutt
 
 =head1 DESCRIPTION
 
-Run to do the above.
+Run to do the above, incl. symlinking relevant binaries in C<~/bin> to the
+neomutt build.
 
 =head1 REQUIREMENTS
 

mercurial