[Emacs-diffs] Changes to emacs/lisp/enriched.el

[Richard M. Stallman]

Index: emacs/lisp/enriched.el
diff -c emacs/lisp/enriched.el:1.42 emacs/lisp/enriched.el:1.43
*** emacs/lisp/enriched.el:1.42 Wed Apr  3 10:28:45 2002
--- emacs/lisp/enriched.el      Thu Apr  4 15:46:55 2002
***************
*** 432,438 ****
        (delete-char 1)))
  
  (defun enriched-decode-foreground (from to &optional color)
!   (if (and color (display-color-p) (facemenu-get-face face))
        (list from to 'face (cons ':foreground color))
      (if (null color)
        (message "Warning: no color specified for <x-color>")
--- 432,438 ----
        (delete-char 1)))
  
  (defun enriched-decode-foreground (from to &optional color)
!   (if (and color (display-color-p))
        (list from to 'face (cons ':foreground color))
      (if (null color)
        (message "Warning: no color specified for <x-color>")
***************
*** 440,446 ****
      nil))
  
  (defun enriched-decode-background (from to &optional color)
!   (if (and color (display-color-p) (facemenu-get-face face))
        (list from to 'face (cons ':background color))
      (if (null color)
        (message "Warning: no color specified for <x-bg-color>")
--- 440,446 ----
      nil))
  
  (defun enriched-decode-background (from to &optional color)
!   (if (and color (display-color-p))
        (list from to 'face (cons ':background color))
      (if (null color)
        (message "Warning: no color specified for <x-bg-color>")