Rename C names to match Lisp symbols better

[gnu-emacs] / src / emacs-module.c

diff --git a/src/emacs-module.c b/src/emacs-module.c
index 3edb943d4cac6499692e9826478400374020ed8f..f9ede84ed1754f93d6858cb924e7ad899a9335cc 100644 (file)
--- a/src/emacs-module.c
+++ b/src/emacs-module.c
@@ -405,7 +405,7 @@ module_make_function (emacs_env *env, ptrdiff_t min_arity, ptrdiff_t max_arity,
                            list2 (Qand_rest, Qargs),
                            doc,
                            list4 (Qapply,
-                                  list2 (Qfunction, Qinternal_module_call),
+                                  list2 (Qfunction, Qinternal__module_call),
                                   envobj,
                                   Qargs));
 
@@ -1047,7 +1047,7 @@ syms_of_module (void)
 
   defsubr (&Smodule_load);
 
-  DEFSYM (Qinternal_module_call, "internal--module-call");
+  DEFSYM (Qinternal__module_call, "internal--module-call");
   defsubr (&Sinternal_module_call);
 }