Parent Directory | Revision Log | Patch
revision 1.23 by miles, Tue Oct 3 07:06:41 2000 UTC | revision 1.24 by pj, Mon Nov 26 16:15:49 2001 UTC | |
---|---|---|
# | Line 119 If called interactively, display a list | Line 119 If called interactively, display a list |
119 | (switch-to-buffer "*doctor*") | (switch-to-buffer "*doctor*") |
120 | (sit-for 0) | (sit-for 0) |
121 | (while (not (input-pending-p)) | (while (not (input-pending-p)) |
122 | (insert-string (yow)) | (insert (yow)) |
123 | (sit-for 0) | (sit-for 0) |
124 | (doctor-ret-or-read 1) | (doctor-ret-or-read 1) |
125 | (doctor-ret-or-read 1))) | (doctor-ret-or-read 1))) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |