Mercurial > emacs
comparison src/keyboard.c @ 9864:0299d64cdd07
(print_help): Set help-mode in *Help* buffer.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Wed, 09 Nov 1994 06:04:46 +0000 |
| parents | 81829106d303 |
| children | 02cd4dde69e1 |
comparison
equal
deleted
inserted
replaced
| 9863:f918fd077a9f | 9864:0299d64cdd07 |
|---|---|
| 1915 | 1915 |
| 1916 Lisp_Object | 1916 Lisp_Object |
| 1917 print_help (object) | 1917 print_help (object) |
| 1918 Lisp_Object object; | 1918 Lisp_Object object; |
| 1919 { | 1919 { |
| 1920 struct buffer *old = current_buffer; | |
| 1920 Fprinc (object, Qnil); | 1921 Fprinc (object, Qnil); |
| 1922 set_buffer_internal (XBUFFER (Vstandard_output)); | |
| 1923 call0 (intern ("help-mode")); | |
| 1924 set_buffer_internal (old); | |
| 1921 return Qnil; | 1925 return Qnil; |
| 1922 } | 1926 } |
| 1923 | 1927 |
| 1924 /* Copy out or in the info on where C-g should throw to. | 1928 /* Copy out or in the info on where C-g should throw to. |
| 1925 This is used when running Lisp code from within get_char, | 1929 This is used when running Lisp code from within get_char, |