[Emacs-diffs] master 85c3e1b: * lisp/progmodes/xref.el (xref-push-marker-stack): Add optional arg.

[Leo Liu]

branch: master
commit 85c3e1be241867feac2b57d1f849085e9d2bb54f
Author: Leo Liu <address@hidden>
Commit: Leo Liu <address@hidden>

    * lisp/progmodes/xref.el (xref-push-marker-stack): Add optional arg.
---
 lisp/progmodes/xref.el |    6 +++---
 1 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/lisp/progmodes/xref.el b/lisp/progmodes/xref.el
index fe72b3f..afcbbf5 100644
--- a/lisp/progmodes/xref.el
+++ b/lisp/progmodes/xref.el
@@ -279,9 +279,9 @@ backward."
 (defvar xref--marker-ring (make-ring xref-marker-ring-length)
   "Ring of markers to implement the marker stack.")
 
-(defun xref-push-marker-stack ()
-  "Add point to the marker stack."
-  (ring-insert xref--marker-ring (point-marker)))
+(defun xref-push-marker-stack (&optional m)
+  "Add point M (defaults to `point-marker') to the marker stack."
+  (ring-insert xref--marker-ring (or m (point-marker))))
 
 ;;;###autoload
 (defun xref-pop-marker-stack ()