Mercurial > hg > xemacs-beta
diff src/emodules.c @ 1733:5903b079bee1
[xemacs-hg @ 2003-10-07 21:52:12 by james]
Use module-extensions instead of an explicit list of module extensions.
| author | james |
|---|---|
| date | Tue, 07 Oct 2003 21:52:26 +0000 |
| parents | a8d8f419b459 |
| children | 7580e52a8218 |
line wrap: on
line diff
--- a/src/emodules.c Thu Oct 02 01:18:37 2003 +0000 +++ b/src/emodules.c Tue Oct 07 21:52:26 2003 +0000 @@ -601,6 +601,7 @@ messages. This would normally only be done if `load-module' was being called by a Lisp function. */); + load_modules_quietly = 0; DEFVAR_LISP ("module-load-path", &Vmodule_load_path /* *List of directories to search for dynamic modules to load. @@ -622,21 +623,23 @@ the correctness of a dynamic module, which can have unpredictable results when a dynamic module is loaded. */); + Vmodule_load_path = Qnil; DEFVAR_BOOL ("unloading-module", &unloading_module /* Used internally by `unload-feature'. Do not set this variable. Danger, danger, Will Robinson! */); + unloading_module = 0; - /* #### Export this to Lisp */ - Vmodule_extensions = list4 (build_string (".ell"), + DEFVAR_LISP ("module-extensions", &Vmodule_extensions /* +*List of filename extensions to use when searching for dynamic modules. +*/); + Vmodule_extensions = list5 (build_string (".ell"), build_string (".so"), build_string (".dll"), - build_string (".dylib")); - staticpro (&Vmodule_extensions); + build_string (".dylib"), + build_string ("")); - load_modules_quietly = 0; - Vmodule_load_path = Qnil; Fprovide (intern ("modules")); }