2

次の内容の組織ファイルがあります。

* My Heading
** TODO Make a FOO
** TODO Take action on bar and FOO
** TODO Check if FOO is working

FOO私の目的は、 のタスクの見出しから単語を強調することorg-agenda-modeです。これを達成するために、私は試しました:

(add-hook 'org-agenda-mode-hook
  (lambda ()
    (font-lock-add-keywords nil
                            '(("\\(FOO\\)" 1 '(:background "red"))))))

しかし、何も変わりません。フック実行されておりC-h v font-lock-keywords、アジェンダ ビュー内で試してみると、返される値は次のとおりです。

(t
 (("\\(FOO\\)" 1
   '(:background "red")))
 ("\\(FOO\\)"
  (1
   '(:background "red"))))

同じアイテムを 2 回表示する以外に、これが機能しない理由がわかりません。設定を無視 しますか?font-lock-modeもしそうなら、どうすれば「カスタム」キーワードのハイライトを に追加できますorg-agenda-modeか?

編集 :

  • M-x emacs-versionGNU Emacs 24.4.1 (i686-pc-mingw32)
  • M-x org-versionOrg-mode version 8.2.10
4

2 に答える 2

2

@lawlist が示唆したように、*Org-Agenda*バッファは を使用しませんfont-lock-mode。議題ビューで私が望むものを達成する最も簡単な方法は、この質問で提案されているようにHiLockを使用することです。

(defface my-hi-lock-face '((t (:background  "red"
                               :foreground  "yellow"
                               :bold t)))
                          "my-hi-lock-face")

(add-hook 'org-finalize-agenda-hook
          (lambda ()
            (highlight-regexp "\\(FOO\\)" "my-hi-lock-face")))

私が使用しているフックに注意してください。これは、アジェンダ バッファを再描画するたびに再度実行されます。

于 2014-12-09T19:25:50.870 に答える