annotate lib-src/leditcfns.c @ 51434:4c85e6a5a9d2
(Info-mode-hook): Obey obsolete `Info-fontify'.
(Info-find-in-tag-table-1): Remove unused vars.
(Info-display-images-node): Remove unused var paragraph-markers.
(Info-header-line): Remove.
(Info-select-node): Don't set it.
(Info-search): Remove unused var `current'.
(Info-follow-reference): Remove unused var `beg'.
(Info-extract-menu-node-name): Remove unused var `i'.
(Info-complete-menu-item): Use `with-current-buffer'.
(Info-index): Remove unused var `rnode'.
(Info-mode): Set header-line-format to check text-properties directly.
(Info-find-emacs-command-nodes): Remove unused var `found' and `exact'.
(Info-fontify-node): Use `push'.
(Info-speedbar-hierarchy-buttons): Use `dolist'.
(Info-speedbar-goto-node, Info-speedbar-fetch-file-nodes):
Check the return value of `string-match'.
(Info-speedbar-fetch-file-nodes): Factor out common code.
author |
Stefan Monnier <monnier@iro.umontreal.ca> |
date |
Tue, 03 Jun 2003 19:54:42 +0000 |
parents |
da530eb93c1a |
children |
695cf19ef79e |
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 }
|