diff --git a/libgnucash/app-utils/guile-util.c b/libgnucash/app-utils/guile-util.c
index 2628919854..4543695d11 100644
--- a/libgnucash/app-utils/guile-util.c
+++ b/libgnucash/app-utils/guile-util.c
@@ -157,39 +157,6 @@ initialize_scm_functions()
     scm_funcs_inited = TRUE;
 }
 
-
-/********************************************************************\
-  gnc_scm_lookup
-
-    returns the SCM binding associated with the given symbol function,
-    or SCM_UNDEFINED if it couldn't be retrieved.
-
-    Don't use this to get hold of symbols that are considered private
-    to a given module unless the C code you're writing is considered
-    part of that module.
-
-  Args:
-
-    module - where to lookup the symbol, something like "ice-9 debug"
-    symbol - what to look up.
-
-  Returns: value bound to the symbol, if any.
-\********************************************************************/
-
-#if 0
-
-************ NOT TESTED YET **************
-
-SCM
-gnc_scm_lookup(const char *module, const char *symbol)
-{
-    SCM scm_module = scm_c_resolve_module(module);
-    SCM value = scm_c_module_lookup(scm_module, symbol);
-    return value;
-}
-
-#endif
-
 /********************************************************************\
  * gnc_copy_split                                                   *
  *   returns a scheme representation of a split. If the split is    *
diff --git a/libgnucash/app-utils/guile-util.h b/libgnucash/app-utils/guile-util.h
index 1624349ca5..c7a523cb8f 100644
--- a/libgnucash/app-utils/guile-util.h
+++ b/libgnucash/app-utils/guile-util.h
@@ -32,11 +32,6 @@
 #include "Account.h"
 #include "gnc-guile-utils.h"
 
-/* Don't use this to get hold of symbols that are considered private
- * to a given module unless the C code you're writing is considered
- * part of that module.  */
-SCM    gnc_scm_lookup(const char *module, const char *symbol);
-
 /* The next set of functions is for manipulating scheme
  * representations of splits and transactions. */
 gboolean gnc_is_split_scm(SCM scm);