Compare commits
2 Commits
Author | SHA1 | Date |
---|---|---|
Atlas Cove | 164833a5c1 | |
Atlas Cove | 959d46a8f7 |
2
mkgmap.1
2
mkgmap.1
|
@ -8,7 +8,7 @@
|
|||
.Nm
|
||||
.Sh DESCRIPTION
|
||||
.Nm
|
||||
generates a simple Gophermap in its standard output,
|
||||
Generates a simple Gophermap in its standard output,
|
||||
listing all text files in the current directory
|
||||
in reverse alphabetical order.
|
||||
.Pp
|
||||
|
|
2
newp.1
2
newp.1
|
@ -9,7 +9,7 @@
|
|||
.Ar word ...
|
||||
.Sh DESCRIPTION
|
||||
.Nm
|
||||
creates a new ms phlog post.
|
||||
Creates a new ms phlog post.
|
||||
The file name will contain the current date and
|
||||
.Ar word ...
|
||||
separated by dashes.
|
||||
|
|
35
pick
35
pick
|
@ -1,35 +0,0 @@
|
|||
#!/usr/bin/env perl
|
||||
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
use Scalar::Util qw{looks_like_number};
|
||||
|
||||
my @choices;
|
||||
|
||||
for (@ARGV) {
|
||||
if (/^--$/) {
|
||||
push(@choices, <STDIN>);
|
||||
} elsif (/^@(.+)$/) {
|
||||
open(my $fh, '<', $1);
|
||||
push(@choices, <$fh>);
|
||||
close($fh);
|
||||
} else {
|
||||
push(@choices, "$_\n");
|
||||
}
|
||||
}
|
||||
|
||||
open(my $tty, '<', '/dev/tty');
|
||||
|
||||
my $sel;
|
||||
until (looks_like_number($sel) && $sel > 0 && $sel <= @choices) {
|
||||
while (my ($i, $c) = each @choices) {
|
||||
print $i+1 . ') ' . $choices[$i];
|
||||
}
|
||||
print $ENV{'PS3'} || '#? ';
|
||||
exit(1) unless defined($sel = <$tty>);
|
||||
}
|
||||
|
||||
close($tty);
|
||||
|
||||
print $choices[$sel - 1];
|
25
pick.1
25
pick.1
|
@ -1,25 +0,0 @@
|
|||
.Dd Sep 13, 2023
|
||||
.Dt TS 1
|
||||
.Os
|
||||
.Sh NAME
|
||||
.Nm pick
|
||||
.Nd Choose interactively from the set of arguments and input lines
|
||||
.Sh SYNOPSIS
|
||||
.Nm
|
||||
.Ar arg ...
|
||||
.Sh DESCRIPTION
|
||||
.Nm
|
||||
will display a Korn shell style selection menu with stdin contents and
|
||||
arguments as options.
|
||||
.Pp
|
||||
When a selection is made, the command will print its value to stdout.
|
||||
If the selection is aborted, nothing will be printed.
|
||||
.Sh ENVIRONMENT
|
||||
.Bl -tag -width PS3
|
||||
.It Ev PS3
|
||||
Prompt string displayed to the user (default: #?).
|
||||
.El
|
||||
.Sh EXIT STATUS
|
||||
.Ex -std
|
||||
.Sh AUTHORS
|
||||
.An Adolfo Perez Alvarez Aq Mt adolfopa@sdf.org
|
4
scmfmt
4
scmfmt
|
@ -21,9 +21,9 @@ i\
|
|||
|
||||
bl' |
|
||||
sed -e '1s/^/./' -e 's/^ /./' |
|
||||
par -P=. |
|
||||
fmt -p |
|
||||
awk '
|
||||
BEGIN { LIMIT = 72 }
|
||||
BEGIN { LIMIT = 65 }
|
||||
NR == 1 || /^[^\.]/ || length($0) < LIMIT {
|
||||
sub(/^\./, NR == 1 ? "" : " ");
|
||||
print;
|
||||
|
|
2
ts.1
2
ts.1
|
@ -10,7 +10,7 @@
|
|||
.Ar test ...
|
||||
.Sh DESCRIPTION
|
||||
.Nm
|
||||
runs the shell tests passed as arguments.
|
||||
Runs the shell tests passed as arguments.
|
||||
If the
|
||||
.Fl b
|
||||
flag is specified, the test is blessed \(em i.e. it is evaluated and the test
|
||||
|
|
2
unpage.1
2
unpage.1
|
@ -8,7 +8,7 @@
|
|||
.Nm
|
||||
.Sh DESCRIPTION
|
||||
.Nm
|
||||
removes all page headers and footers from stdin,
|
||||
Removes all page headers and footers from stdin,
|
||||
getting as result output that contains a single continuous page.
|
||||
.Pp
|
||||
This command expects its input to be the result of processing an ms document
|
||||
|
|
|
@ -8,7 +8,7 @@
|
|||
.Nm
|
||||
.Sh DESCRIPTION
|
||||
.Nm
|
||||
takes an ms troff document in stdin,
|
||||
Takes an ms troff document in stdin,
|
||||
and outputs to its stdout the same document
|
||||
with all
|
||||
.Qq .TL
|
||||
|
|
Loading…
Reference in New Issue