From b21921768f7b3c3115121050da3285501cdeeebc Mon Sep 17 00:00:00 2001
From: Thierry Volpiatto <thierry.volpiatto@gmail.com>
Date: Thu, 2 Nov 2017 09:58:53 +0100
Subject: [PATCH] Add an error message for unreferenced markers (#1891)

* helm-ring.el (helm-mark-ring-default-action): Do it.
---
 helm-ring.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/helm-ring.el b/helm-ring.el
index a8589360b..79d2c017a 100644
--- a/helm-ring.el
+++ b/helm-ring.el
@@ -266,9 +266,10 @@ This is a command for `helm-kill-ring-map'."
             (unless helm-yank-point (setq helm-yank-point (point))))
           (helm-goto-char target)
           (helm-highlight-current-line))
-      ;; marker point to no buffer, no need to dereference it, just
+      ;; marker points to no buffer, no need to dereference it, just
       ;; delete it.
-      (setq mark-ring (delete target mark-ring)))))
+      (setq mark-ring (delete target mark-ring))
+      (error "Marker points to no buffer"))))
 
 (defvar helm-source-mark-ring
   (helm-build-sync-source "mark-ring"