🚀 go-pugleaf

>>>>> On 13 Dec 92 03:02:27 GMT, pedersen@seas.smu.edu (Ted Pedersen) said:

Ted> I am using emacs 18.59.1 and having some difficulty. When I use an X
Ted> terminal (we run X11R5) my emacs window has little bitty type in it.
Ted> When I expand the window I get a bigger window but the type remains
Ted> the same very small size. Is there a way to make the emacs type size
Ted> larger? Otherwise emacs works fine in this setup. 

Nothing that works interactively, however I have a script which
determines what size X screen it is running on and does the right
thing.  It might be useful.  It requires a C program called xgeon,
which is included here also.  The script is smart enough to know you
are NOT in a xterm and do the right thing on an ASCII termainal.  All
I ever do is type "em" no matter where I am and I get the right thing.


/* xgeom.c */
#include <X11/Xlib.h>
#include <stdio.h>

main(argc, argv)
	int argc;
	char **argv;
{
	int screen, h, w;

	Display *disp;

	if ((disp = XOpenDisplay(NULL)) == NULL)
	{
		fprintf(stderr, "Can't open display\n");
		exit(-1);
	}
	screen = DefaultScreen(disp);

	h = DisplayHeight(disp, screen);
	w = DisplayWidth(disp, screen);
	printf("%d %d\n", w, h);
	exit(0);
}


#! /bin/sh
#
#	script file to start emacs in X windows or outside of it
#
EMACS="emacs"
EINIT="-l ~/Emacs/eshellinit.el"
XSWVBIG="-ib 2 -bd red -w =81x40+10+1050"
XSWBIG="-ib 2 -bd red -w =81x40+310+50"
XSWV="-ib 2 -bd red -w =81x40+5+950"
XSW="-ib 2 -bd red -w =81x40+310+50"
XFONTBIG="-fn 12x24"
XFONT="-fn 10x20"
XCOLORS="-fg white -bg blue -cr white -ms white"

if [ "$1" = "tiny" ] ; then
XSWVBIG="-ib 2 -bd red -w =150x60+10+1200"
XFONTBIG="-fn 8x13"
shift
fi

if [ "$DISPLAY" -a "$1" != "-nw" ] ; then
	args=$*
	. $XSCRIPTS/fbident
	if [ "$XWMGR" = tvtwm ] ; then
		if [ $wid -ge 1280 ] ; then
			exec $EMACS -i $XCOLORS $XFONTBIG \
				$XSWVBIG $EINIT $args &
		else
			exec $EMACS -i $XCOLORS $XFONT $XSWV $EINIT $args &
		fi
		exit
	fi
	if [ $wid -ge 1280 ] ; then
		exec $EMACS -i $XCOLORS $XFONTBIG $XSWBIG $EINIT $args &
		exit
	else
		exec $EMACS -i $XCOLORS $XFONT $XSW $EINIT $args &
		exit
	fi
else
	unset DISPLAY
	if [ "$1" = "-nw" ] ; then
		shift
	fi
	exec $EMACS -nw $EINIT $*
fi


---------------------------------------------------------------------
-- 
Dion Hollenbeck                        Email: hollen@megatek.com
Senior Software Engineer                      megatek!hollen@uunet.uu.net
Megatek Corporation, San Diego, California    ucsd!megatek.uucp!hollen