uupick under SunOS 4.1
fts1!mcr at uunet.uu.net
fts1!mcr at uunet.uu.net
Wed Dec 12 04:59:05 AEST 1990
I've been using uuto and uupick as a simple means of moving files between
work and home without worrying about the exact details of Permissions,
etc... Having basically ignored this subset of UUCP since I discovered it
had been added, I had no expectations.
Suddenly, it dawned on me what the '\c' in the uupick prompt was about. A
quick file on /usr/bin/uupick revealed it to be a shell script. It has
been copied verbatim from the AT&T HDB stuff. Echo, is of course,
incompatible. I include a brief patch: (back it up first of course)
*** /usr/bin/uupick Thu Feb 8 09:48:25 1990
--- /usr/bin/uupick Tue Dec 11 12:50:19 1990
***************
*** 11,16 ****
--- 11,18 ----
var=""
varto=""
varfrom=""
+ c=''
+ n='-n'
trap "exit 1" 1 2 13 15
# get options
if test $# -gt 2
***************
*** 56,67 ****
do
if test $j = "." -o $j = ".."; then continue; fi
if test -d $j
! then echo "from system $i: directory $j \c"
! else echo "from system $i: file $j \c"
fi
while true
do
! echo '? \c'
if read cmd dir
then
trap ": ;;" 1
--- 58,69 ----
do
if test $j = "." -o $j = ".."; then continue; fi
if test -d $j
! then echo $n "from system $i: directory $j $c"
! else echo $n "from system $i: file $j $c"
fi
while true
do
! echo $n '? $c'
if read cmd dir
then
trap ": ;;" 1
***************
*** 158,164 ****
sh -c "$ex"
cd $tdir
echo '!' ;;
! *) echo "usage: [d][m dir][a dir][p][q]\c"
echo "[cntl-d][!cmd][*][new-line]" ;;
esac
trap "exit 1" 1
--- 160,166 ----
sh -c "$ex"
cd $tdir
echo '!' ;;
! *) echo $n "usage: [d][m dir][a dir][p][q]$\c"
echo "[cntl-d][!cmd][*][new-line]" ;;
esac
trap "exit 1" 1
:!mcr!: | The postmaster never | So much mail,
Michael Richardson | resolves twice. | so few cycles.
mcr at julie.UUCP/michael at fts1.UUCP/mcr at doe.carleton.ca -- Domain address
- Pay attention only to _MY_ opinions. - registration in progress.
More information about the Comp.sys.sun
mailing list