diff options
author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2019-08-14 22:35:42 +0100 |
---|---|---|
committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2019-08-14 22:35:42 +0100 |
commit | 14022dd54fb9b1dcd9cc84e968491a7119d9c2a2 (patch) | |
tree | 38c869ec82704482135ec2f88f16384f4ce7f635 /elisp/geiser-edit.el | |
parent | d31161b3d38451dc1b72843f64ca1a4db3f3e8a6 (diff) | |
download | geiser-guile-14022dd54fb9b1dcd9cc84e968491a7119d9c2a2.tar.gz geiser-guile-14022dd54fb9b1dcd9cc84e968491a7119d9c2a2.tar.bz2 |
Pushing the correct marker (fixes #279)
Diffstat (limited to 'elisp/geiser-edit.el')
-rw-r--r-- | elisp/geiser-edit.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/elisp/geiser-edit.el b/elisp/geiser-edit.el index 541363d..c374c92 100644 --- a/elisp/geiser-edit.el +++ b/elisp/geiser-edit.el @@ -1,6 +1,6 @@ ;;; geiser-edit.el -- scheme edit locations -;; Copyright (C) 2009, 2010, 2012, 2013 Jose Antonio Ortega Ruiz +;; Copyright (C) 2009, 2010, 2012, 2013, 2019 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 @@ -239,7 +239,7 @@ With prefix, asks for the symbol to edit." (marker (point-marker))) (condition-case-unless-debug err-of-sym (progn (geiser-edit--try-edit symbol (geiser-eval--send/wait cmd)) - (when marker (xref-push-marker-stack))) + (when marker (xref-push-marker-stack marker))) (error (condition-case-unless-debug err-of-mod (geiser-edit-module-at-point) (error (error "Geiser:cannot edit symbol at point\nSymbol error message:%s\nModule error message:%s" |