From 33eae9c01beae82329e02d7745fab1e485dd0144 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 9 Aug 1997 19:11:15 +0000 Subject: [PATCH] (widget-single-line-display-table): Variable commented out; don't use it either. --- lisp/wid-edit.el | 21 +++++++++++---------- 1 file changed, 11 insertions(+), 10 deletions(-) diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el index 9cb5f1ffd24..1d6de477221 100644 --- a/lisp/wid-edit.el +++ b/lisp/wid-edit.el @@ -173,16 +173,17 @@ This exists as a variable so it can be set locally in certain buffers.") "Face used for editable fields spanning only a single line." :group 'widget-faces) -(defvar widget-single-line-display-table - (let ((table (make-display-table))) - (aset table 9 "^I") - (aset table 10 "^J") - table) - "Display table used for single-line editable fields.") - -(when (fboundp 'set-face-display-table) - (set-face-display-table 'widget-single-line-field-face - widget-single-line-display-table)) +;;; This causes display-table to be loaded, and not usefully. +;;;(defvar widget-single-line-display-table +;;; (let ((table (make-display-table))) +;;; (aset table 9 "^I") +;;; (aset table 10 "^J") +;;; table) +;;; "Display table used for single-line editable fields.") + +;;;(when (fboundp 'set-face-display-table) +;;; (set-face-display-table 'widget-single-line-field-face +;;; widget-single-line-display-table)) ;;; Utility functions. ;; -- 2.39.2