view lib-src/leditcfns.c @ 2955:4d269e525e21

[xemacs-hg @ 2005-09-26 22:18:59 by adrian] xemacs-21.5-clean: Getting texinfmt.el to compile core .texi again -------------------- ChangeLog entries follow: -------------------- man/ChangeLog addition: 2005-09-27 Adrian Aichner <adrian@xemacs.org> * lispref/packaging.texi: Get file to compile with teinfmt.el. * lispref/packaging.texi (Packaging): Ditto. * lispref/packaging.texi (Package Overview): Ditto. * lispref/packaging.texi (The User View): Ditto. * lispref/packaging.texi (The Library Maintainer View): Ditto. * lispref/packaging.texi (Infrastructure): Ditto. * lispref/packaging.texi (Obtaining): Ditto. * lispref/packaging.texi (Local.rules File): Ditto. * lispref/packaging.texi (package-info.in): Ditto. * lispref/packaging.texi (Makefile): Ditto. * lispref/packaging.texi (Documenting Packages): Ditto. 2005-09-27 Adrian Aichner <adrian@xemacs.org> * internals/internals.texi (A Summary of the Various XEmacs Modules): Get file to compile with texinfmt.el. * internals/internals.texi (Windows Build Flags): Ditto.
author adrian
date Mon, 26 Sep 2005 22:19:05 +0000
parents 376386a54a3c
children
line wrap: on
line source

/* Synched up with: FSF 19.28. */

#include <sgtty.h>
#include <signal.h>
#define STRLEN 100
static char str[STRLEN+1] = "%?emacs"; /* extra char for the null */

switch_to_proc(){
    char *ptr = str;
    while (*ptr) ioctl(0, TIOCSTI, ptr++);
    ioctl(0, TIOCSTI, "\n");
    kill(getpid(), SIGTSTP);
    }

set_proc_str(ptr) char *ptr; {
    if (strlen(ptr) <= STRLEN)
	strcpy(str, ptr);
    else
	printf("string too long for set-proc-str: %s\n", ptr);
    }