branch: externals/dicom commit b10bd042bdac60314866df6be0f96031ebe0a79d Author: Daniel Mendler <m...@daniel-mendler.de> Commit: Daniel Mendler <m...@daniel-mendler.de>
Get rid of display table --- dicom.el | 9 +-------- 1 file changed, 1 insertion(+), 8 deletions(-) diff --git a/dicom.el b/dicom.el index 2620f3be1f..eab1aea025 100644 --- a/dicom.el +++ b/dicom.el @@ -172,12 +172,6 @@ progress:${percent-pos}%%' %s) & disown" </svg>") "Thumbnail placeholder image.") -(defvar dicom--display-table - (let ((table (make-display-table))) - (set-display-table-slot table 'wrap ?\s) - table) - "Display table to hide wrap characters.") - ;;;; Internal functions (defun dicom--bookmark-record () @@ -475,11 +469,10 @@ progress:${percent-pos}%%' %s) & disown" dicom--file file dicom--data (dicom--read file) buffer-read-only t - buffer-display-table dicom--display-table truncate-lines nil word-wrap t left-fringe-width 0 - right-fringe-width 0 + right-fringe-width 1 bookmark-make-record-function #'dicom--bookmark-record revert-buffer-function (lambda (&rest _) (dicom--setup file)) outline-regexp "\\*+"