Mercurial > hg > xemacs-beta
diff src/emacs.c @ 460:223736d75acb r21-2-45
Import from CVS: tag r21-2-45
| author | cvs |
|---|---|
| date | Mon, 13 Aug 2007 11:43:24 +0200 |
| parents | c33ae14dd6d0 |
| children | 0784d089fdc9 |
line wrap: on
line diff
--- a/src/emacs.c Mon Aug 13 11:42:27 2007 +0200 +++ b/src/emacs.c Mon Aug 13 11:43:24 2007 +0200 @@ -181,7 +181,6 @@ #include "systime.h" #ifdef PDUMP -#include "dump-id.h" #include "dumper.h" #endif @@ -284,6 +283,7 @@ Lisp_Object Vexec_path; Lisp_Object Vexec_directory, Vconfigure_exec_directory; Lisp_Object Vlisp_directory, Vconfigure_lisp_directory; +Lisp_Object Vmule_lisp_directory, Vconfigure_mule_lisp_directory; Lisp_Object Vmodule_directory, Vconfigure_module_directory; Lisp_Object Vsite_module_directory, Vconfigure_site_module_directory; Lisp_Object Vconfigure_package_path; @@ -3590,6 +3590,22 @@ Vconfigure_lisp_directory = Qnil; #endif + DEFVAR_LISP ("mule-lisp-directory", &Vmule_lisp_directory /* +*Directory of Mule Lisp files that come with XEmacs. +*/ ); + Vmule_lisp_directory = Qnil; + + DEFVAR_LISP ("configure-mule-lisp-directory", &Vconfigure_mule_lisp_directory /* +For internal use by the build procedure only. +configure's idea of what `mule-lisp-directory' will be. +*/ ); +#ifdef PATH_MULELOADSEARCH + Vconfigure_mule_lisp_directory = Ffile_name_as_directory + (build_string ((char *) PATH_MULELOADSEARCH)); +#else + Vconfigure_mule_lisp_directory = Qnil; +#endif + DEFVAR_LISP ("module-directory", &Vmodule_directory /* *Directory of core dynamic modules that come with XEmacs. */ );