--- a/.emacs-my	Sun Aug 16 00:12:34 2020 +0300
+++ b/.emacs-my	Sun Aug 16 00:13:35 2020 +0300
@@ -2331,28 +2331,28 @@
   (defface my-gnus-own-unread-face nil
     "Use this face to display own postings in Summary Buffer"
     :group 'my-gnus)
-  (copy-face 'gnus-summary-high-unread-face 'my-gnus-own-unread-face)
+  (copy-face 'gnus-summary-high-unread 'my-gnus-own-unread-face)
   (set-face-background 'my-gnus-own-unread-face "linen")
   (add-to-list 'gnus-summary-highlight
                '((and (> score 190) (eq mark gnus-unread-mark)) . my-gnus-own-unread-face))
   (defface my-gnus-own-ancient-face nil
     "Use this face to display own postings in Summary Buffer"
     :group 'my-gnus)
-  (copy-face 'gnus-summary-high-ancient-face 'my-gnus-own-ancient-face)
+  (copy-face 'gnus-summary-high-ancient 'my-gnus-own-ancient-face)
   (set-face-background 'my-gnus-own-ancient-face "linen")
   (add-to-list 'gnus-summary-highlight
                '((and (> score 190) (eq mark gnus-ancient-mark)) . my-gnus-own-ancient-face))
   (defface my-gnus-own-ticked-face nil
     "Use this face to display own postings in Summary Buffer"
     :group 'my-gnus)
-  (copy-face 'gnus-summary-high-ticked-face 'my-gnus-own-ticked-face)
+  (copy-face 'gnus-summary-high-ticked 'my-gnus-own-ticked-face)
   (set-face-background 'my-gnus-own-ticked-face "linen")
   (add-to-list 'gnus-summary-highlight
                '((and (> score 190) (or (eq mark gnus-dormant-mark) (eq mark gnus-ticked-mark))) . my-gnus-own-ticked-face))
   (defface my-gnus-fup-face nil
     "Use this face to display direct fups to my postings."
     :group 'my-gnus)
-  (copy-face 'gnus-summary-high-unread-face 'my-gnus-fup-face)
+  (copy-face 'gnus-summary-high-unread 'my-gnus-fup-face)
   (set-face-background 'my-gnus-fup-face "honeydew")
   (add-to-list 'gnus-summary-highlight
                '((and (<= 90 score) (<= score 110) (eq mark gnus-unread-mark)) . my-gnus-fup-face)) )