github.com/Interlisp.maiko
1
0
Fork 0
mirror of https://github.com/Interlisp/maiko.git synced 2026-02-10 10:10:21 +00:00
Code Issues Projects Releases Wiki Activity

Implement -noscroll option to ldex to disable X window scroll bars (#399)

Browse Source 
Adds a -noscroll option, parsed as an X option, also accessible via
resource ldex*noscroll, which avoids adding the bottom and side scroll
bars and the bit-gravity control buttons to the main Lisp display window.

Unless the geometry given for the X window in which the Lisp screen is
displayed is at least as big as the Lisp screen part of the Lisp screen
(bottom, right) will not be visible.

On macOS with XQuartz, maximizing the X window will bring it to
the size of the Lisp screen (or the size of the display, whichever is smaller)
This commit is contained in:
Nick Briggs
2021-09-30 10:44:37 -07:00
committed by GitHub
parent 4d2bf13347
commit 3cdbccd0c7
5 changed files with 133 additions and 116 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
src/main.c
View File

@@ -210,7 +210,8 @@ int UnixPipeIn;
int UnixPipeOut;
int UnixPID;
int please_fork = 1;
/* disable X11 scroll bars if requested */
int noscroll = 0;
/*** STACK handle staff(Takeshi) **/
LispPTR *STACKOVERFLOW_word;
LispPTR *GuardStackAddr_word;