# HG changeset patch # User Richard M. Stallman # Date 871153875 0 # Node ID e4b14e6fd28f09c3f7563a388f8ebb536477dce9 # Parent 40a9475f22eabc1db9df899963f2f788110119e4 (widget-single-line-display-table): Variable commented out; don't use it either. diff -r 40a9475f22ea -r e4b14e6fd28f lisp/wid-edit.el --- a/lisp/wid-edit.el Sat Aug 09 18:37:59 1997 +0000 +++ b/lisp/wid-edit.el Sat Aug 09 19:11:15 1997 +0000 @@ -173,16 +173,17 @@ "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. ;;