diff --git a/scripts/opac3.el b/scripts/opac3.el index fc2b6c82461bca7447f5982ee84d5360623e7aee..c927ea3f5d29071c35748d8364f714ece775a563 100644 --- a/scripts/opac3.el +++ b/scripts/opac3.el @@ -192,3 +192,20 @@ :after-hook 'opac3-mode-hook) (provide 'opac3) + + +(defface ac-etags-candidate-face + '((t (:background "gainsboro" :foreground "deep sky blue"))) + "Face for etags candidate") + +(defface ac-etags-selection-face + '((t (:background "deep sky blue" :foreground "white"))) + "Face for the etags selected candidate.") + +(defvar ac-source-etags + '((candidates . (lambda () + (all-completions ac-target (tags-completion-table)))) + (candidate-face . ac-etags-candidate-face) + (selection-face . ac-etags-selection-face) + (requires . 3)) + "Source for etags.")