If you want to have a clear or form-feed, call `clear' or `printf "\f"' at
the shell level. Anyway, what's the sense of a clear *after* the scan output?
options=(-link -nolink -version -help)
;;
scan )
options=(-link -nolink -version -help)
;;
scan )
- options=(-clear -noclear -form -header -noheader
+ options=(-form -header -noheader
-width -file -version -help )
;;
show )
-width -file -version -help )
;;
show )
rmmproc normmproc help)" -- refile
compctl -K mhfseq -x 's[+][@]' -K mhcomp -S / -q - \
rmmproc normmproc help)" -- refile
compctl -K mhfseq -x 's[+][@]' -K mhcomp -S / -q - \
- 's[-]' -k "(clear noclear form \
file help width)" - 'c[-1,-file]' -f - 'c[-1,-form]' -K mhfile -- scan
compctl -K mhfseq -x 's[+][@]' -K mhcomp -S / -q - \
file help width)" - 'c[-1,-file]' -f - 'c[-1,-form]' -K mhfile -- scan
compctl -K mhfseq -x 's[+][@]' -K mhcomp -S / -q - \
.B scan
.RI [ +folder ]
.RI [ msgs ]
.B scan
.RI [ +folder ]
.RI [ msgs ]
-.RB [ \-clear " | " \-noclear ]
.RB [ \-form
.IR formatfile ]
.RB [ \-width
.RB [ \-form
.IR formatfile ]
.RB [ \-width
.B scan
.RI [ +folder ]
.RI [ msgs ]
.B scan
.RI [ +folder ]
.RI [ msgs ]
-.RB [ \-clear " | " \-noclear ]
.RB [ \-form
.IR formatfile ]
.RB [ \-width
.RB [ \-form
.IR formatfile ]
.RB [ \-width
may be used to specify the width of
the scan line. The default is to use the width of the terminal.
.PP
may be used to specify the width of
the scan line. The default is to use the width of the terminal.
.PP
-If the
-.B \-clear
-switch is used and
-.BR scan 's
-output is directed
-to a terminal, then
-.B scan
-will consult the environment variables
-.B $TERM
-and
-.B $TERMCAP
-to determine your terminal type in order
-to find out how to clear the screen prior to exiting. If the
-.B \-clear
-switch is used and
-.BR scan 's
-output is not directed to a terminal
-(e.g., a pipe or a file), then
-.B scan
-will send a formfeed prior
-to exiting.
-.PP
-For example, the command:
-(scan \-clear ; show all \-show pr \-f) | lpr
+(scan | pr ; show a \-showproc pr) | lpr
-produces a scan listing of the current folder, followed by a formfeed,
+produces a scan listing of the current folder,
followed by a formatted listing of all messages in the folder, one
per page. Omitting
followed by a formatted listing of all messages in the folder, one
per page. Omitting
-.RB \*(lq "\-show\ pr\ \-f" \*(rq
+.RB \*(lq "\-showproc\ pr" \*(rq
will cause the messages to be
concatenated, separated by a one\-line header and two blank lines.
.PP
will cause the messages to be
concatenated, separated by a one\-line header and two blank lines.
.PP
#include <errno.h>
static struct swit switches[] = {
#include <errno.h>
static struct swit switches[] = {
-#define CLRSW 0
- { "clear", 0 },
-#define NCLRSW 1
- { "noclear", 0 },
-#define FORMSW 2
{ "form formatfile", 0 },
{ "form formatfile", 0 },
{ "help", 0 },
{ NULL, 0 }
};
{ "help", 0 },
{ NULL, 0 }
};
-/*
-** prototypes
-*/
-void clear_screen(void); /* from termsbr.c */
-
-
int
main(int argc, char **argv)
{
int
main(int argc, char **argv)
{
- int clearflag = 0, ontty;
int width = 0;
int i, state, msgnum;
int seqnum[NUMATTRS], unseen, num_unseen_seq = 0;
int width = 0;
int i, state, msgnum;
int seqnum[NUMATTRS], unseen, num_unseen_seq = 0;
print_version(invo_name);
done(1);
print_version(invo_name);
done(1);
- case CLRSW:
- clearflag++;
- continue;
- case NCLRSW:
- clearflag = 0;
- continue;
-
case FORMSW:
if (!(form = *argp++) || *form == '-')
adios(NULL, "missing argument to %s",
case FORMSW:
if (!(form = *argp++) || *form == '-')
adios(NULL, "missing argument to %s",
}
folder_free(mp); /* free folder/message structure */
}
folder_free(mp); /* free folder/message structure */
- if (clearflag)
- clear_screen();