diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2016-05-29 03:39:51 +0200 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2016-05-29 03:39:51 +0200 |
| commit | cc84a03528f016779f7ce478b46d6170b989de81 (patch) | |
| tree | 15096469e79ea98591dd9466b34187db198feed8 /elisp/geiser-debug.el | |
| parent | 679623fb5c9cd7d58a92a98b0190e98a67a69491 (diff) | |
| download | geiser-cc84a03528f016779f7ce478b46d6170b989de81.tar.gz geiser-cc84a03528f016779f7ce478b46d6170b989de81.tar.bz2 | |
Fixes for geiser-debug-jump-to-debug-p and geiser-debug-show-debug-p
I wonder if this has ever worked fine: geiser-debug--display-retort was
a little mess. It should be a bit better now, but Guile is still
displaying funny messages.
Diffstat (limited to 'elisp/geiser-debug.el')
| -rw-r--r-- | elisp/geiser-debug.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/elisp/geiser-debug.el b/elisp/geiser-debug.el index 00fd4d9..7afcb53 100644 --- a/elisp/geiser-debug.el +++ b/elisp/geiser-debug.el @@ -1,6 +1,6 @@ ;;; geiser-debug.el -- displaying debug information and evaluation results -;; Copyright (C) 2009, 2010, 2011, 2012, 2013, 2014, 2015 Jose Antonio Ortega Ruiz +;; Copyright (C) 2009, 2010, 2011, 2012, 2013, 2014, 2015, 2016 Jose Antonio Ortega Ruiz ;; This program is free software; you can redistribute it and/or ;; modify it under the terms of the Modified BSD License. You should @@ -164,9 +164,10 @@ buffer.") (geiser-debug--display-error impl module nil what)) (goto-char (point-min))) (when (or img dbg) - (geiser-debug--pop-to-buffer) + (when geiser-debug-show-debug-p + (geiser-debug--pop-to-buffer)) (when (and dbg (not geiser-debug-jump-to-debug-p)) - (next-error) + (ignore-errors (next-error)) (when (not geiser-debug-show-debug-p) (pop-to-buffer (geiser-debug--buffer) 'display-buffer-reuse-window t) |