[nongnu] elpa/doc-show-inline 11a29ebfd7 11/12: Fix use of marker-position on an integer

[ELPA Syncer]

branch: elpa/doc-show-inline
commit 11a29ebfd7939691b34b511082173e4b5d1b9c81
Author: Campbell Barton <ideasman42@gmail.com>
Commit: Campbell Barton <ideasman42@gmail.com>

    Fix use of marker-position on an integer
---
 changelog.rst      | 3 +++
 doc-show-inline.el | 9 ++++++++-
 2 files changed, 11 insertions(+), 1 deletion(-)

diff --git a/changelog.rst b/changelog.rst
index 7da0963dc1..8f98699421 100644
--- a/changelog.rst
+++ b/changelog.rst
@@ -3,6 +3,9 @@
 Change Log
 ##########
 
+- 2022-04-19
+  - Fix use of marker-position on an integer.
+
 - 2022-03-14
   - Add option ``doc-show-inline-exclude-blank-lines`` to exclude doc-strings 
with blank lines
     between the declarations and the doc-strings.
diff --git a/doc-show-inline.el b/doc-show-inline.el
index 139e2c8187..2f53a85aee 100644
--- a/doc-show-inline.el
+++ b/doc-show-inline.el
@@ -454,7 +454,14 @@ the point should not be moved by this function."
               (setq alist (cdr pair)))
 
             ((number-or-marker-p (setq mark (cdr pair)))
-              (let ((pos (marker-position mark)))
+              (let
+                (
+                  (pos
+                    (cond
+                      ((markerp mark)
+                        (marker-position mark))
+                      (t ;; Integer.
+                        mark))))
                 (unless (or (and pos-beg (<= pos pos-beg)) (and pos-end (>= 
pos pos-end)))
                   (push pos result))))))
         (t