changeset 5113:b2dcf6a6d8ab

some changes to doc strings/comments in disp-table.el -------------------- ChangeLog entries follow: -------------------- lisp/ChangeLog addition: 2010-03-07 Ben Wing <ben@xemacs.org> * disp-table.el: * disp-table.el (standard-display-g1): * disp-table.el (standard-display-graphic): Fix up docs; add comments about authorship.
author Ben Wing <ben@xemacs.org>
date Sun, 07 Mar 2010 06:43:19 -0600
parents ba80cff33640
children 85b327aa1b47 e84ee15ca495 444a448b2f53 0f66906b6e37
files lisp/ChangeLog lisp/disp-table.el
diffstat 2 files changed, 18 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Sat Dec 26 00:20:16 2009 -0600
+++ b/lisp/ChangeLog	Sun Mar 07 06:43:19 2010 -0600
@@ -1,3 +1,10 @@
+2010-03-07  Ben Wing  <ben@xemacs.org>
+
+	* disp-table.el:
+	* disp-table.el (standard-display-g1):
+	* disp-table.el (standard-display-graphic):
+	Fix up docs; add comments about authorship.
+
 2010-03-06  Ben Wing  <ben@xemacs.org>
 
 	* test-harness.el:
--- a/lisp/disp-table.el	Sat Dec 26 00:20:16 2009 -0600
+++ b/lisp/disp-table.el	Sun Mar 07 06:43:19 2010 -0600
@@ -2,8 +2,8 @@
 
 ;; Copyright (C) 1987, 1994, 1997, 2007 Free Software Foundation, Inc.
 ;; Copyright (C) 1995 Sun Microsystems.
+;; Copyright (C) 2005 Ben Wing.
 
-;; Author: Howard Gayle
 ;; Maintainer: XEmacs Development Team
 ;; Keywords: i18n, internal
 
@@ -29,7 +29,10 @@
 ;;; Commentary:
 
 ;; Rewritten for XEmacs July 1995, Ben Wing.
-
+;; November 1998?, display tables generalized to char/range tables, Hrvoje
+;; Niksic.
+;; July 2007, rewrite this file to handle generalized display tables,
+;; Aidan Kehoe.
 
 ;;; Code:
 
@@ -116,6 +119,9 @@
 
 ;; Let me say one more time how much dynamic scoping sucks.
 
+;; #### Need more thinking about basic primitives for modifying a specifier.
+;; cf `modify-specifier-instances'.
+
 ;;;###autoload
 (defun frob-display-table (fdt-function fdt-locale &optional tag-set)
   (or fdt-locale (setq fdt-locale 'global))
@@ -184,8 +190,8 @@
 ;;;###autoload
 (defun standard-display-g1 (c sc &optional locale)
   "Display character C as character SC in the g1 character set.
-This function assumes that your terminal uses the SO/SI characters;
-it is meaningless for an X frame."
+This only has an effect on TTY devices and assumes that your terminal uses
+the SO/SI characters."
   (frob-display-table
    (lambda (x)
      (put-char-table c (concat "\016" (char-to-string sc) "\017") x))
@@ -194,8 +200,7 @@
 ;;;###autoload
 (defun standard-display-graphic (c gc &optional locale)
   "Display character C as character GC in graphics character set.
-This function assumes VT100-compatible escapes; it is meaningless for an
-X frame."
+This only has an effect on TTY devices and assumes VT100-compatible escapes."
   (frob-display-table
    (lambda (x)
      (put-char-table c (concat "\e(0" (char-to-string gc) "\e(B") x))