X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Fguile-debugger.ly;h=c992b652364f2804d44304ee3d2f788c372b9463;hb=4a91e5818686d6d5e49d32666dcd67020a21cff7;hp=401aff95fc1594755729c4ba34e2ebaeb612d883;hpb=1dab1e3680bf7cf154f640be6180800a6ecd0a06;p=lilypond.git

diff --git a/ly/guile-debugger.ly b/ly/guile-debugger.ly
index 401aff95fc..c992b65236 100644
--- a/ly/guile-debugger.ly
+++ b/ly/guile-debugger.ly
@@ -1,6 +1,6 @@
 %%%% This file is part of LilyPond, the GNU music typesetter.
 %%%%
-%%%% Copyright (C) 2009 by Ian Hulin <ian@hulin.org.uk>
+%%%% Copyright (C) 2009--2015 by Ian Hulin <ian@hulin.org.uk>
 %%%%
 %%%% LilyPond is free software: you can redistribute it and/or modify
 %%%% it under the terms of the GNU General Public License as published by
@@ -18,29 +18,34 @@
 
 
 %%  \include this file to enable the setting of breakpoints in guile.
-%%  Once loaded, this file will open a guile debug prompt.  Type
-%%  help
-%%  at the debug prompt to get a list of possible commands.
+%%  Once loaded, this file will open a guile prompt.  Type
+%%  (debug-help)
+%%  at the guile prompt to get a list of possible commands.
 %%  For more information, see the Contributor's Guide.
 
 
-\version "2.13.10"
+\version "2.16.0"
 
-% define lilypond-module as a variable in the guile-user module and set to the current
-% Scheme module (which will be the lilypond top-level
+% define lilypond-module as a variable in the guile-user module and set
+% to the current Scheme module (which will be the lilypond top-level
 % module)
 
 #(module-define! (resolve-module '(guile-user))
                  'lilypond-module
                  (current-module))
 %
-% Ensure we have command-line recall available at guile> prompt
+% Ensure we have command-line recall available at the guile prompt
 %
 #(use-modules (ice-9 readline))
 #(activate-readline)
-#(display "\n Guile debugger for Lilypond\n")
+#(display "\n Guile debugger for Lilypond")
+#(display "\n For help enter (debug-help)\n")
+%
+% Ensure debugger definitions are available in lilypond-module and guile-user
+%
 #(use-modules (scm guile-debugger))
-#(newline)
+#(ly:module-copy (resolve-module '(guile-user))
+                 (resolve-module '(scm guile-debugger)))
 #(top-repl)
 %
 % top-repl has re-set the module to guile-user,