Mercurial > emacs
changeset 6030:8b3f54fb451f
(get_doc_string, Snarf_documentation): Use new variable doc_directory.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Tue, 22 Feb 1994 23:49:01 +0000 |
parents | 897ffebd97ea |
children | ae4c6623837b |
files | src/doc.c |
diffstat | 1 files changed, 6 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/src/doc.c Tue Feb 22 23:46:42 1994 +0000 +++ b/src/doc.c Tue Feb 22 23:49:01 1994 +0000 @@ -50,13 +50,13 @@ register int count; extern char *index (); - if (XTYPE (Vdata_directory) != Lisp_String + if (XTYPE (Vdoc_directory) != Lisp_String || XTYPE (Vdoc_file_name) != Lisp_String) return Qnil; - name = (char *) alloca (XSTRING (Vdata_directory)->size + name = (char *) alloca (XSTRING (Vdoc_directory)->size + XSTRING (Vdoc_file_name)->size + 8); - strcpy (name, XSTRING (Vdata_directory)->data); + strcpy (name, XSTRING (Vdoc_directory)->data); strcat (name, XSTRING (Vdoc_file_name)->data); #ifdef VMS #ifndef VMS4_4 @@ -280,10 +280,10 @@ name = (char *) alloca (XSTRING (filename)->size + 14); strcpy (name, "../etc/"); #else /* CANNOT_DUMP */ - CHECK_STRING (Vdata_directory, 0); + CHECK_STRING (Vdoc_directory, 0); name = (char *) alloca (XSTRING (filename)->size + - XSTRING (Vdata_directory)->size + 1); - strcpy (name, XSTRING (Vdata_directory)->data); + XSTRING (Vdoc_directory)->size + 1); + strcpy (name, XSTRING (Vdoc_directory)->data); #endif /* CANNOT_DUMP */ strcat (name, XSTRING (filename)->data); /*** Add this line ***/ #ifdef VMS