emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/page-break-lines 314b397910 67/80: Revert "Prefer set-disp


From: ELPA Syncer
Subject: [nongnu] elpa/page-break-lines 314b397910 67/80: Revert "Prefer set-display-table-slot to raw aset"
Date: Tue, 5 Sep 2023 04:03:08 -0400 (EDT)

branch: elpa/page-break-lines
commit 314b397910b3d16bb7cbcc25098696348e678080
Author: Steve Purcell <steve@sanityinc.com>
Commit: Steve Purcell <steve@sanityinc.com>

    Revert "Prefer set-display-table-slot to raw aset"
    
    This reverts commit 31f1fbe0e36423a9cd141b3595a31c0e9237da67.
---
 page-break-lines.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/page-break-lines.el b/page-break-lines.el
index 8c68fed613..067bd90916 100644
--- a/page-break-lines.el
+++ b/page-break-lines.el
@@ -142,10 +142,10 @@ its display table will be modified as necessary."
                      (glyph (make-glyph-code page-break-lines-char 
'page-break-lines))
                      (new-display-entry (vconcat (make-list width glyph))))
                 (unless (equal new-display-entry (elt buffer-display-table 
?\^L))
-                  (set-display-table-slot buffer-display-table ?\^L 
new-display-entry)))))
+                  (aset buffer-display-table ?\^L new-display-entry)))))
         (when (and (apply 'derived-mode-p page-break-lines-modes)
                    buffer-display-table)
-          (set-display-table-slot buffer-display-table ?\^L nil))))))
+          (aset buffer-display-table ?\^L nil))))))
 
 (defun page-break-lines--update-display-tables  (&optional frame)
   "Function called for updating display table in windows of FRAME."



reply via email to

[Prev in Thread] Current Thread [Next in Thread]