1996-11-01 06:45:43 +00:00
|
|
|
/*-
|
|
|
|
* Copyright (c) 1993, 1994
|
|
|
|
* The Regents of the University of California. All rights reserved.
|
|
|
|
* Copyright (c) 1992, 1993, 1994, 1995, 1996
|
|
|
|
* Keith Bostic. All rights reserved.
|
|
|
|
*
|
|
|
|
* See the LICENSE file for redistribution information.
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include "config.h"
|
|
|
|
|
|
|
|
#include <sys/types.h>
|
|
|
|
#include <sys/queue.h>
|
|
|
|
#include <sys/time.h>
|
|
|
|
|
|
|
|
#include <bitstring.h>
|
|
|
|
#include <limits.h>
|
|
|
|
#include <stdio.h>
|
|
|
|
|
|
|
|
#include "../common/common.h"
|
|
|
|
#include "vi.h"
|
|
|
|
|
|
|
|
/*
|
|
|
|
* v_screen -- ^W
|
|
|
|
* Switch screens.
|
|
|
|
*
|
2015-04-10 13:26:05 +00:00
|
|
|
* PUBLIC: int v_screen(SCR *, VICMD *);
|
1996-11-01 06:45:43 +00:00
|
|
|
*/
|
|
|
|
int
|
2013-08-11 09:44:58 +00:00
|
|
|
v_screen(SCR *sp, VICMD *vp)
|
1996-11-01 06:45:43 +00:00
|
|
|
{
|
|
|
|
/*
|
|
|
|
* You can't leave a colon command-line edit window -- it's not that
|
|
|
|
* it won't work, but it gets real weird, real fast when you execute
|
|
|
|
* a colon command out of a window that was forked from a window that's
|
|
|
|
* now backgrounded... You get the idea.
|
|
|
|
*/
|
|
|
|
if (F_ISSET(sp, SC_COMEDIT)) {
|
|
|
|
msgq(sp, M_ERR,
|
|
|
|
"308|Enter <CR> to execute a command, :q to exit");
|
|
|
|
return (1);
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Try for the next lower screen, or, go back to the first
|
|
|
|
* screen on the stack.
|
|
|
|
*/
|
2013-08-11 09:44:58 +00:00
|
|
|
if (TAILQ_NEXT(sp, q) != NULL)
|
|
|
|
sp->nextdisp = TAILQ_NEXT(sp, q);
|
|
|
|
else if (TAILQ_FIRST(sp->gp->dq) == sp) {
|
1996-11-01 06:45:43 +00:00
|
|
|
msgq(sp, M_ERR, "187|No other screen to switch to");
|
|
|
|
return (1);
|
|
|
|
} else
|
2013-08-11 09:44:58 +00:00
|
|
|
sp->nextdisp = TAILQ_FIRST(sp->gp->dq);
|
1996-11-01 06:45:43 +00:00
|
|
|
|
|
|
|
F_SET(sp->nextdisp, SC_STATUS);
|
|
|
|
F_SET(sp, SC_SSWITCH | SC_STATUS);
|
|
|
|
return (0);
|
|
|
|
}
|