[Message Prev][Message Next][Thread Prev][Thread Next][Message Index][Thread Index]

Meadow-1.15 の defface



こんにちは、塩野@遊び人です。

Meadow-1.15 で、以下のようなエラーが出るのですが、これは、
Meadow では対応していない プロパティということでしょうか?

*** 情況 ***
semantic-1.4/semantic-1.4.1 の semantic-util-modes.el で定義され
ている以下の部分
----
(defface semantic-unmatched-syntax-face
  '((((class color) (background dark))
     (:underline "red"))
    (((class color) (background light))
     (:underline "red")))
  "*Face used to show unmatched-syntax in.
The face is used in  `semantic-show-unmatched-syntax-mode'."
  :group 'semantic)
----
が、エラーになる。
スタックトレースです。
Signaling: (error "Invalid face property. underline")
  signal(error ("Invalid face property. underline"))
  error("Invalid face property. %S" underline)
  internal-set-face-property(semantic-unmatched-syntax-face underline "red" #<frame MeadowNT.exe@ECBIBLO2 0x1c05500\ >)
  set-face-underline-p(semantic-unmatched-syntax-face "red" #<frame MeadowNT.exe@ECBIBLO2 0x1c05500\ >)
  face-spec-set-1(semantic-unmatched-syntax-face #<frame MeadowNT.exe@ECBIBLO2 0x1c05500\ > (:underline "red") :underline set-face-underline-p)
  face-spec-set(semantic-unmatched-syntax-face (((... ...) (:underline "red")) ((... ...) (:underline "red"))) #<frame MeadowNT.exe@ECBIBLO2 0x1c05500\ >)
  custom-declare-face(semantic-unmatched-syntax-face (((... ...) (:underline "red")) ((... ...) (:underline "red"))) "*Face used to show unmatched-syntax in.\nThe face is used in  `semantic-show-unmatched-syntax-mode'." :group semantic)
  (defface semantic-unmatched-syntax-face (quote (... ...)) "*Face used to show unmatched-syntax in.\nThe face is used in  `semantic-show-unmatched-syntax-mode'." :group (quote semantic))
  eval-buffer(#<buffer  *load*<5>> nil "semantic-util-modes")
  load-with-code-conversion("d:/Meadow/site-lisp/semantic-1.4.1/semantic-util-modes.el" "semantic-util-modes" nil t)
  require(semantic-util-modes)
  eval-buffer(#<buffer  *load*<4>> nil "semantic-util")
  load-with-code-conversion("d:/Meadow/site-lisp/semantic-1.4.1/semantic-util.el" "semantic-util" nil t)
  require(semantic-util)
  eval-buffer(#<buffer  *load*<3>> nil "semantic")
  load-with-code-conversion("d:/Meadow/site-lisp/semantic-1.4.1/semantic.el" "semantic" nil t)
  require(semantic)
  eval-buffer(#<buffer  *load*<2>> nil "semantic-util")
  load-with-code-conversion("d:/Meadow/site-lisp/semantic-1.4.1/semantic-util.el" "semantic-util" nil t)
  require(semantic-util)
  eval-buffer(#<buffer  *load*> nil "semantic-util-modes")
  load-with-code-conversion("d:/Meadow/site-lisp/semantic-1.4.1/semantic-util-modes.el" "semantic-util-modes" nil nil)
  load("semantic-util-modes")
  load-library("semantic-util-modes")
  call-interactively(load-library)
  execute-extended-command(nil)
* call-interactively(execute-extended-command)
となります。:underline を :background にするとエラーは出ません。

#私の環境が悪いのかな。
--
                             ∧_∧
                            ミ^.^ミ E-Mail: jun@xxxxxxxxxxxxxxxx
私たちの人生は、私たちがついやした努力だけの価値がある。
                                  モーリアック