branch: elpa/popon
commit b0eb45b29588b9296f723fba6c385b542465d0f2
Author: Akib Azmain Turja <a...@disroot.org>
Commit: Akib Azmain Turja <a...@disroot.org>

    Fix #6: Don't use caddr function
---
 popon.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/popon.el b/popon.el
index 4ea6e05e6b..6aa41370af 100644
--- a/popon.el
+++ b/popon.el
@@ -107,7 +107,7 @@ shouldn't contain newlines.  Example:
                             (buffer-substring (point) (point-max))))
               (setf (cadr (nth (+ y i) framebuffer)) t)
               (when (< end (point-max))
-                (setf (caddr (nth (+ y i) framebuffer)) t))))))
+                (setf (cadr (cdr (nth (+ y i) framebuffer))) t))))))
       framebuffer)))
 
 ;;;###autoload

Reply via email to