--- a/help_browser.cc
+++ b/help_browser.cc
@@ -508,7 +508,7 @@
 @seealso{help, doc}\n\
 @end deftypefn\n")
 {
-  mlock ();
+  mlock ("help_browser");
   
   // Handle Input
   octave_value_list retval;
@@ -544,7 +544,7 @@
 @deftypefn {Loadable Function} __help_browser_add_path__ (@var{note}, @var{path})\n\
 @end deftypefn\n")
 {
-  mlock ();
+  mlock ("__help_browser_add_path__");
   
   // Handle Input
   octave_value_list retval;
--- a/__init_gtk__.cc
+++ b/__init_gtk__.cc
@@ -69,7 +69,7 @@
 @deftypefn {Loadable Function} __init_gtk__ (})\n\
 @end deftypefn\n")
 {
-  mlock ();
+  mlock ("__init_gtk__");
   start_gtk ();
 
   return octave_value_list ();