• Home
  • History
  • Annotate
  • Raw
  • Download
  • only in /macosx-10.9.5/emacs-92/emacs/lisp/erc/

Lines Matching +defs:mouse +defs:face

157 \(e.g. `erc-pal-face' is used if a pal sent a message to that channel.)"
162 '(erc-error-face erc-current-nick-face erc-keyword-face erc-pal-face
163 erc-nick-msg-face erc-direct-msg-face erc-button erc-dangerous-host-face
164 erc-default-face erc-action-face erc-nick-default-face erc-fool-face
165 erc-notice-face erc-input-face erc-prompt-face)
168 be highlighted using that face. The first matching face is used."
170 :type '(repeat face))
173 "Only track text highlighted with a priority face.
239 indicating how often activity was noticed, and FACE is the face to use
684 (defvar erc-track-mouse-face (if (featurep 'xemacs)
687 "The face to use when mouse is over channel names in the mode line.")
703 (define-key map (vector 'mode-line 'mouse-2)
710 (define-key map (vector 'mode-line 'mouse-3)
720 'help-echo (concat "mouse-2: switch to buffer, "
721 "mouse-3: switch to buffer in other window")
723 (put-text-property 0 (length name) 'mouse-face erc-track-mouse-face name)
725 (put-text-property 0 (length name) 'face faces name))
782 (defun erc-track-find-face (faces)
783 "Return the face to use in the modeline from the faces in FACES.
787 candidate face)
788 (while (and candidates (not face))
792 (setq face candidate)))
793 face))
819 ;; (in the car), change its face attribute (in the cddr) if
834 (cons 1 (erc-track-find-face faces)))
836 ;; Else modify the face for the buffer, if necessary.
840 (old-face (cddr cell))
841 (new-face (erc-track-find-face
842 (if old-face
843 (cons old-face faces)
845 (setcdr cell (cons (1+ (cadr cell)) new-face)))))
863 (faces (erc-list (get-text-property 0 'face str))))
864 (while (and (setq i (next-single-property-change i 'face str m))
866 (dolist (face (erc-list (get-text-property i 'face str)))
867 (add-to-list 'faces face)))
873 'face '(bold erc-current-nick-face)