Mercurial > emacs
diff lib-src/make-docfile.c @ 638:40b255f55df3
*** empty log message ***
| author | Jim Blandy <jimb@redhat.com> |
|---|---|
| date | Sun, 10 May 1992 18:15:10 +0000 |
| parents | e0ec73426aea |
| children | 39f0e62a8511 |
line wrap: on
line diff
--- a/lib-src/make-docfile.c Sun May 10 18:13:22 1992 +0000 +++ b/lib-src/make-docfile.c Sun May 10 18:15:10 1992 +0000 @@ -1,11 +1,11 @@ /* Generate doc-string file for GNU Emacs from source files. - Copyright (C) 1985, 1986 Free Software Foundation, Inc. + Copyright (C) 1985, 1986, 1992 Free Software Foundation, Inc. This file is part of GNU Emacs. GNU Emacs is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by -the Free Software Foundation; either version 1, or (at your option) +the Free Software Foundation; either version 2, or (at your option) any later version. GNU Emacs is distributed in the hope that it will be useful, @@ -166,7 +166,13 @@ else if (c == ' ' && space) continue; space = (c == ' '); - putc (c, out); + + /* Print the C arguments as they would appear in Elisp; + print underscores as hyphens. */ + if (c == '_') + putc ('-'); + else + putc (c, out); } putc ('\n', out); }
