;;; disp-table.el --- functions for dealing with char tables
-;; Copyright (C) 1987, 1994-1995, 1999, 2001-2011
-;; Free Software Foundation, Inc.
+;; Copyright (C) 1987, 1994-1995, 1999, 2001-2016 Free Software
+;; Foundation, Inc.
;; Author: Erik Naggum <erik@naggum.no>
;; Based on a previous version by Howard Gayle
-;; Maintainer: FSF
+;; Maintainer: emacs-devel@gnu.org
;; Keywords: i18n
;; Package: emacs
(defun describe-current-display-table ()
"Describe the display table in use in the selected window and buffer."
(interactive)
- (let ((disptab (or (window-display-table (selected-window))
+ (let ((disptab (or (window-display-table)
buffer-display-table
standard-display-table)))
(if disptab
(set-terminal-coding-system nil))))
(display-warning 'i18n
- "`standard-display-european' is semi-obsolete; see its doc string for details"
+ (format-message
+ "`standard-display-european' is semi-obsolete; see its doc string for details")
:warning)
;; Switch to Latin-1 language environment