* If program was invoked with name ending
* in `s', then add switch `-all'.
*/
* If program was invoked with name ending
* in `s', then add switch `-all'.
*/
arguments = getarguments (invo_name, argc, argv, 1);
argp = arguments;
arguments = getarguments (invo_name, argc, argv, 1);
argp = arguments;
/* If no folder is given, the current folder and */
/* the top of the folder stack are swapped. */
if ((cp = context_find (stack))) {
/* If no folder is given, the current folder and */
/* the top of the folder stack are swapped. */
if ((cp = context_find (stack))) {
ap = brkstring (dp, " ", "\n");
argfolder = getcpy(*ap++);
} else {
ap = brkstring (dp, " ", "\n");
argfolder = getcpy(*ap++);
} else {
if (argfolder)
adios (NULL, "sorry, no folders allowed with -pop");
if ((cp = context_find (stack))) {
if (argfolder)
adios (NULL, "sorry, no folders allowed with -pop");
if ((cp = context_find (stack))) {
ap = brkstring (dp, " ", "\n");
argfolder = getcpy(*ap++);
} else {
ap = brkstring (dp, " ", "\n");
argfolder = getcpy(*ap++);
} else {
if (listsw) {
printf ("%s", argfolder ? argfolder : getfolder (1));
if ((cp = context_find (stack))) {
if (listsw) {
printf ("%s", argfolder ? argfolder : getfolder (1));
if ((cp = context_find (stack))) {
snprintf (atrcur, sizeof(atrcur), "atr-%s-", current);
atrlen = strlen (atrcur);
snprintf (atrcur, sizeof(atrcur), "atr-%s-", current);
atrlen = strlen (atrcur);