aboutsummaryrefslogtreecommitdiffstats
path: root/src/doc.c
diff options
context:
space:
mode:
authorKaroly Lorentey2005-03-06 13:31:20 +0000
committerKaroly Lorentey2005-03-06 13:31:20 +0000
commita0d878a9ccbfb7c68dd7cfbe05c2b71b9bd5c830 (patch)
tree79ba80d6f6c4b787c60b36ebcd87c1b26f0906e1 /src/doc.c
parentab455350da7728b0f8e1daf92c084092d8a04c29 (diff)
parentbe6e87e51aaa3a114bc4ff2ceccbc7c9aa2b30d0 (diff)
downloademacs-a0d878a9ccbfb7c68dd7cfbe05c2b71b9bd5c830.tar.gz
emacs-a0d878a9ccbfb7c68dd7cfbe05c2b71b9bd5c830.zip
Merged from miles@gnu.org--gnu-2005 (patch 34-36, 142-158)
Patches applied: * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-142 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-143 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-144 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-145 (make-text-button): Default button type if not specified * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-146 quick-install-emacs: Use mkdir --verbose only when requested * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-147 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-148 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-149 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-150 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-151 Merge from gnus--rel--5.10 * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-152 Add info/dir to arch branch * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-153 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-154 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-155 Merge from gnus--rel--5.10 * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-156 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-157 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-158 Update from CVS * miles@gnu.org--gnu-2005/gnus--rel--5.10--patch-34 Merge from emacs--cvs-trunk--0 * miles@gnu.org--gnu-2005/gnus--rel--5.10--patch-35 Update from CVS * miles@gnu.org--gnu-2005/gnus--rel--5.10--patch-36 Update from CVS git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-303
Diffstat (limited to 'src/doc.c')
-rw-r--r--src/doc.c32
1 files changed, 8 insertions, 24 deletions
diff --git a/src/doc.c b/src/doc.c
index 0d1ab394647..d3e58f4b6cb 100644
--- a/src/doc.c
+++ b/src/doc.c
@@ -58,26 +58,24 @@ static Lisp_Object Vbuild_files;
58extern Lisp_Object Voverriding_local_map; 58extern Lisp_Object Voverriding_local_map;
59 59
60/* For VMS versions with limited file name syntax, 60/* For VMS versions with limited file name syntax,
61 convert the name to something VMS will allow. */ 61 convert the name to something VMS will allow. */
62static void 62static void
63munge_doc_file_name (name) 63munge_doc_file_name (name)
64 char *name; 64 char *name;
65{ 65{
66#ifdef VMS 66#ifdef VMS
67#ifndef VMS4_4 67#ifndef NO_HYPHENS_IN_FILENAMES
68 /* For VMS versions with limited file name syntax, 68 extern char * sys_translate_unix (char *ufile);
69 convert the name to something VMS will allow. */ 69 strcpy (name, sys_translate_unix (name));
70 p = name; 70#else /* NO_HYPHENS_IN_FILENAMES */
71 char *p = name;
71 while (*p) 72 while (*p)
72 { 73 {
73 if (*p == '-') 74 if (*p == '-')
74 *p = '_'; 75 *p = '_';
75 p++; 76 p++;
76 } 77 }
77#endif /* not VMS4_4 */ 78#endif /* NO_HYPHENS_IN_FILENAMES */
78#ifdef VMS4_4
79 strcpy (name, sys_translate_unix (name));
80#endif /* VMS4_4 */
81#endif /* VMS */ 79#endif /* VMS */
82} 80}
83 81
@@ -607,21 +605,7 @@ the same file name is found in the `doc-directory'. */)
607 strcpy (name, SDATA (Vdoc_directory)); 605 strcpy (name, SDATA (Vdoc_directory));
608 } 606 }
609 strcat (name, SDATA (filename)); /*** Add this line ***/ 607 strcat (name, SDATA (filename)); /*** Add this line ***/
610#ifdef VMS 608 munge_doc_file_name (name);
611#ifndef VMS4_4
612 /* For VMS versions with limited file name syntax,
613 convert the name to something VMS will allow. */
614 p = name;
615 while (*p)
616 {
617 if (*p == '-')
618 *p = '_';
619 p++;
620 }
621#else /* VMS4_4 */
622 strcpy (name, sys_translate_unix (name));
623#endif /* VMS4_4 */
624#endif /* VMS */
625 609
626 /* Vbuild_files is nil when temacs is run, and non-nil after that. */ 610 /* Vbuild_files is nil when temacs is run, and non-nil after that. */
627 if (NILP (Vbuild_files)) 611 if (NILP (Vbuild_files))