branch: elpa/extmap
commit 96a3aabd277ff999cba22e4b9acdc76dd887b5ba
Author: Paul Pogonyshev <pogonys...@gmail.com>
Commit: Paul Pogonyshev <pogonys...@gmail.com>
Avoid functions added to `subr' only recently.
---
extmap.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/extmap.el b/extmap.el
index e8629a704d..c0c3557068 100644
--- a/extmap.el
+++ b/extmap.el
@@ -125,9 +125,9 @@ returns nil."
(cdr value)
;; Load now.
(let ((coding-system-for-read 'utf-8)
- (offset (caddr value)))
+ (offset (cadr (cdr value))))
(with-temp-buffer
- (insert-file-contents (nth 0 extmap) nil offset (+
offset (cdddr value)))
+ (insert-file-contents (nth 0 extmap) nil offset (+
offset (cddr (cdr value))))
(let ((new-value (if (= (cadr value) 2)
(buffer-string) (read (current-buffer)))))
(if weak-data
(puthash key new-value weak-data)
