124997Ssam /* 224997Ssam * Copyright (c) 1985 Regents of the University of California. 324997Ssam * All rights reserved. The Berkeley software License Agreement 424997Ssam * specifies the terms and conditions for redistribution. 524997Ssam */ 624997Ssam 724997Ssam #ifndef lint 8*25012Ssam static char sccsid[] = "@(#)linemod.c 5.2 (Berkeley) 09/21/85"; 924997Ssam #endif not lint 1024997Ssam 11*25012Ssam /* 12*25012Ssam * Hack to set font. 13*25012Ssam */ 1424997Ssam linemod(s) 1524997Ssam char *s; 1624997Ssam { 17*25012Ssam register char *tit; 18*25012Ssam register char *nam; 19*25012Ssam int siz = 0; 20*25012Ssam nam = s; 21*25012Ssam for(tit = "charset="; *tit; ) 22*25012Ssam if (*tit++ != *nam++) 23*25012Ssam return; 24*25012Ssam s = nam; 25*25012Ssam while(*nam) 26*25012Ssam switch(*nam++) { 27*25012Ssam case ',': 28*25012Ssam case '\n': 29*25012Ssam *--nam = 0; 30*25012Ssam } 31*25012Ssam siz = atoi(++nam); 32*25012Ssam if (siz == 0) { 33*25012Ssam while (*--nam >= '0' && *nam <= '9') 34*25012Ssam ; 35*25012Ssam siz = (atoi(++nam)*4)/3; 36*25012Ssam } 37*25012Ssam if (siz == 0) 38*25012Ssam siz = imPcsize; 39*25012Ssam setfont(s, siz); 4024997Ssam } 41