]> code.delx.au - gnu-emacs/blobdiff - lisp/enriched.el
(iso-accents-accent-key): Check iso-accents-enable here.
[gnu-emacs] / lisp / enriched.el
index a1a9e766efc050cd79180b386bec6919867a319e..b0618b3571c4e56a904c8d63df4c54b49fa48552 100644 (file)
@@ -1,7 +1,7 @@
-;;; enriched.el -- read and save files in text/enriched format
-;; Copyright (c) 1994 Free Software Foundation
+;;; enriched.el --- read and save files in text/enriched format
+;; Copyright (c) 1994, 1995 Free Software Foundation, Inc.
 
-;; Author: Boris Goldowsky <boris@cs.rochester.edu>
+;; Author: Boris Goldowsky <boris@gnu.ai.mit.edu>
 ;; Keywords: wp, faces
 
 ;; This file is part of GNU Emacs.
@@ -79,7 +79,7 @@ stored in the file.")
     nil
   (make-face 'excerpt)
   (if window-system
-      (make-face-italic 'excerpt)))
+      (make-face-italic 'excerpt nil t)))
 
 (defconst enriched-display-table (or (copy-sequence standard-display-table)
                                     (make-display-table)))
@@ -415,7 +415,7 @@ One annotation each for foreground color, background color, italic, etc."
 
 (defun enriched-next-annotation ()
   "Find and return next text/enriched annotation.
-Any \"<<\" strings encountered are coverted to \"<\".
+Any \"<<\" strings encountered are converted to \"<\".
 Return value is \(begin end name positive-p), or nil if none was found."
   (while (and (search-forward "<" nil 1)
              (progn (goto-char (match-beginning 0))