Mercurial > emacs
annotate lib-src/leditcfns.c @ 89979:2e44ef8c14b4
Revision: miles@gnu.org--gnu-2004/emacs--unicode--0--patch-41
Merge from emacs--cvs-trunk--0
Patches applied:
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-551
Update from CVS
* miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-552
Merge from gnus--rel--5.10
* miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-27
Use the same directory explicit id-tags as Emacs where possible
* miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-28
- miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-29
Update from CVS
author | Miles Bader <miles@gnu.org> |
---|---|
date | Fri, 17 Sep 2004 14:31:05 +0000 |
parents | 68c22ea6027c |
children |
rev | line source |
---|---|
0 | 1 #include <sgtty.h> |
2 #include <signal.h> | |
3 #define STRLEN 100 | |
4 static char str[STRLEN+1] = "%?emacs"; /* extra char for the null */ | |
5 | |
6 switch_to_proc(){ | |
7 char *ptr = str; | |
8 while (*ptr) ioctl(0, TIOCSTI, ptr++); | |
9 ioctl(0, TIOCSTI, "\n"); | |
10 kill(getpid(), SIGTSTP); | |
11 } | |
12 | |
13 set_proc_str(ptr) char *ptr; { | |
14 if (strlen(ptr) <= STRLEN) | |
15 strcpy(str, ptr); | |
16 else | |
17 printf("string too long for set-proc-str: %s\n", ptr); | |
18 } | |
89909 | 19 |
20 /* arch-tag: eb7ae804-0d6e-4077-ab42-7173821410c3 | |
21 (do not change this comment) */ |