3 @ Do something on the current file
8 @ Do something on the tagged files
9 set %t; CMD=%{Enter command}
16 0 Edit a bug report and send it to root
17 I=`mktemp "${MC_TMPDIR:-/tmp}/mail.XXXXXX"` || exit 1
19 test -r $I && mail root < $I
22 =+ f \.1$ | f \.3$ | f \.4$ | f \.5$ | f \.6$ | f \.7$ | f \.8$ | f \.man$ & t r
23 1 Display the file with roff -man
26 2 Call the info hypertext browser
30 3 Compress the current subdirectory (tar.gz)
32 echo -n "Name of the compressed file (without extension) [$Pwd]: "
34 if [ "$tar"x = x ]; then tar="$Pwd"; fi
36 tar cf - "$Pwd" | gzip -f9 > "$tar.tar.gz" && \
37 echo "../$tar.tar.gz created."
39 4 Compress the current subdirectory (tar.bz2)
41 echo -n "Name of the compressed file (without extension) [$Pwd]: "
43 if [ "$tar"x = x ]; then tar="$Pwd"; fi
45 tar cf - "$Pwd" | bzip2 -f > "$tar.tar.bz2" && \
46 echo "../$tar.tar.bz2 created."
48 5 Compress the current subdirectory (tar.p7)
50 echo -n "Name of the compressed file (without extension) [$Pwd]: "
52 if [ "$tar"x = x ]; then tar="$Pwd"; fi
54 tar cf - "$Pwd" | 7za a -si "$tar.tar.7z" && \
55 echo "../$tar.tar.7z created."
57 6 Compress the current subdirectory (tar.lzma)
59 echo -n "Name of the compressed file (without extension) [$Pwd]: "
61 if [ "$tar"x = x ]; then tar="$Pwd"; fi
63 tar cf - "$Pwd" | lzma -f > "$tar.tar.lzma" && \
64 echo "../$tar.tar.lzma created."
66 7 Compress the current subdirectory (tar.lz)
68 echo -n "Name of the compressed file (without extension) [$Pwd]: "
70 if [ "$tar"x = x ]; then tar="$Pwd"; fi
72 tar cf - "$Pwd" | lzip -f > "$tar.tar.lz" && \
73 echo "../$tar.tar.lz created."
75 8 Compress the current subdirectory (tar.xz)
77 echo -n "Name of the compressed file (without extension) [$Pwd]: "
79 if [ "$tar"x = x ]; then tar="$Pwd"; fi
81 tar cf - "$Pwd" | xz -f > "$tar.tar.xz" && \
82 echo "../$tar.tar.xz created."
85 + f \.c$ & t r & ! t t
86 Compile and link current .c file
87 make `basename %f .c` 2>/dev/null || cc -O -o `basename %f .c` %f
90 a Append file to opposite
94 A Append files to opposite files
102 d Delete file if a copy exists in the other directory.
103 if [ "%d" = "%D" ]; then
104 echo "The two directories must be different."
107 if [ -f %D/%f ]; then # if two of them, then
108 if cmp -s %D/%f %f; then
109 rm %f && echo "%f: DELETED."
111 echo "%f and %D/%f differ: NOT deleted."
112 echo -n "Press RETURN "
116 echo "%f: No copy in %D/%f: NOT deleted."
120 D Delete tagged files if a copy exists in the other directory.
121 if [ "%d" = "%D" ]; then
122 echo "The two directores must be different."
127 if [ -f "%D/$i" ]; then
130 if [ "$SUM1" = "$SUM2" ]; then
131 rm "$i" && echo "${i}: DELETED."
133 echo "$i and %D/$i differ: NOT deleted."
136 echo "%f has no copy in %D/%f: NOT deleted."
141 MAN=%{Enter manual name}
142 %view man -P cat $MAN
146 n Inspect gzip'ed newsbatch file
147 dd if=%f bs=1 skip=12|zcat|${PAGER-more}
148 # assuming the cunbatch header is 12 bytes long.
152 h Strip headers from current newsarticle
153 CHECK=`awk '{print $1 ; exit}' %f` 2>/dev/null
156 I=`mktemp "${MC_TMPDIR:-/tmp}/news.XXXXXX"` || exit 1
157 cp %f "$I" && sed '/^'"$CHECK"' /,/^$/d' "$I" > %f
158 [ "$?" = "0" ] && rm "$I"
159 echo "%f: header removed."
162 echo "%f is not a news article."
167 H Strip headers from the marked newsarticles
169 while [ -n "$1" ]; do
170 CHECK=`awk '{print $1 ; exit}' $1` 2>/dev/null
171 WFILE=`mktemp "${MC_TMPDIR:-/tmp}/news.XXXXXX"` || exit 1
174 cp "$1" "$WFILE" && sed '/^'"$CHECK"' /,/^$/d' "$WFILE" > "$1"
175 if [ "$?" = "0" ]; then
176 rm "$WFILE"; echo "$1 header removed. OK."
178 echo "Oops! Please check $1 against $WFILE."
182 echo "$1 skipped: Not a news article."
190 r Copy file to remote host
191 echo -n "To which host?: "
193 echo -n "To which directory on $Host?: "
195 rcp -p %f "${Host}:$Dir"
198 R Copy files to remote host (no error checking)
199 echo -n "Copy files to which host?: "
201 echo -n "To which directory on $Host? :"
203 rcp -pr %u "${Host}:$Dir"
206 + f \.tex$ & t r & ! t t
207 t Run latex on file and show it with xdvi
208 latex %f && xdvi `basename %f .tex`.dvi
210 =+ f ^part | f ^Part | f uue & t r
212 U Uudecode marked news articles (needs work)
215 while [ -n "$1" ]; do # strip headers
216 FIRST=`awk '{print $1 ; exit}' "$1"`
217 cat "$1" | sed '/^'"$FIRST"' /,/^$/d'; shift
219 ) |sed '/^$/d' |sed -n '/^begin 6/,/^end$/p' | uudecode
220 if [ "$?" != "0" ]; then
221 echo "Cannot decode %t."
223 echo "Please test the output file before deleting anything."
225 =+ f \.tar\.gz$ | f \.tar\.z$ | f \.tgz$ | f \.tpz$ | f \.tar\.lz$ | f \.tar\.lzma$ | f \.tar\.lz$ | f \.tar\.7z$ | f \.tar\.xz$ | f \.tar\.Z$| f \.tar\.bz2$ & t r
226 x Extract the contents of a compressed tar file
232 *.tar.gz|*.tar.z|*.tgz|*.tpz|*.tar.Z)
255 y Gzip or gunzip current file
264 Y Gzip or gunzip tagged files
276 b Bzip2 or bunzip2 current file
284 B Bzip2 or bunzip2 tagged files
291 bzip2 $DECOMP -v "$i"
294 + f \.tar.gz$ | f \.tgz$ | f \.tpz$ | f \.tar.Z$ | f \.tar.z$ | f \.tar.bz2$ | f \.tar.F$ & t r & ! t t
295 z Extract compressed tar file to subdirectory
299 *.tar.gz) D="`basename %f .tar.gz`";;
300 *.tgz) D="`basename %f .tgz`";;
301 *.tpz) D="`basename %f .tpz`";;
302 *.tar.Z) D="`basename %f .tar.Z`";;
303 *.tar.z) D="`basename %f .tar.z`";;
304 *.tar.bz2) D="`basename %f .tar.bz2`"; set bunzip2 -c ;;
305 *.tar.F) D="`basename %f .tar.F`"; set freeze -dc;
307 mkdir "$D"; cd "$D" && ("$1" "$2" ../%f | tar xvf -)
310 Z Extract compressed tar files to subdirectories
316 *.tar.gz) D="`basename $i .tar.gz`";;
317 *.tgz) D="`basename $i .tgz`";;
318 *.tpz) D="`basename $i .tpz`";;
319 *.tar.Z) D="`basename $i .tar.Z`";;
320 *.tar.z) D="`basename $i .tar.z`";;
321 *.tar.F) D="`basename $i .tar.F`"; set freeze -dc;;
322 *.tar.bz2) D="`basename $i .tar.bz2`"; set bunzip2 -c;;
324 mkdir "$D"; (cd "$D" && "$1" "$2" "../$i" | tar xvf -)
327 + f \.gz$ | f \.tgz$ | f \.tpz$ | f \.Z$ | f \.z$ | f \.bz2$ & t r & ! t t
328 c Convert gz<->bz2, tar.gz<->tar.bz2 & tgz->tar.bz2
340 tgz|tpz) D="`basename %f .$EXT`.tar";;
341 gz|Z|z) D="`basename %f .$EXT`";;
342 bz2) D="`basename %f .bz2`";;
344 if [ "$EXT" = "bz2" ]; then
345 bunzip2 -v %f ; gzip -f9 -v "$D"
347 gunzip -v %f ; bzip2 -v "$D"
351 C Convert gz<->bz2, tar.gz<->tar.bz2 & tgz->tar.bz2
366 tgz) D="`basename $1 .tgz`.tar";;
367 tpz) D="`basename $1 .tpz`.tar";;
368 gz|Z|z) D="`basename $1 .$EXT`";;
369 bz2) D="`basename $1 .bz2`";;
371 if [ "$EXT" = "bz2" ]; then
381 + x /usr/bin/open | x /usr/local/bin/open & x /bin/sh
382 o Open next a free console