Lines Matching +defs:font +defs:lock +defs:reference +defs:face
59 ;; excellent reference card made by Philip Rooke. This card can be found
250 "Entries starting with this keyword will be exported in fixed-width font.
420 Changing it requires restart of `font-lock-mode' to become effective
428 :group 'org-font-lock
2390 "Non-nil means, lines starting with \":\" will be in fixed width font.
2491 font-family: Times, serif;
2492 font-size: 12pt;
2499 .tag { background-color:lightblue; font-weight:normal }
2505 font-family: courier, monospace;
2521 p { font-weight: normal; color: gray; }
2626 (defgroup org-font-lock nil
2627 "Font-lock settings for highlighting in Org-mode."
2634 Changing it requires restart of `font-lock-mode' to become effective
2636 :group 'org-font-lock
2641 This works by using the face `org-hide' for these stars. This
2642 face is white for a light background, and black for a dark
2643 background. You may have to customize the face `org-hide' to
2645 Changing it requires restart of `font-lock-mode' to become effective
2652 :group 'org-font-lock
2656 "Non-nil means, change the face of a headline if it is marked DONE.
2660 :group 'org-font-lock
2666 :group 'org-font-lock
2732 :group 'org-font-lock
2752 characters, the face to bbe used by font-lock for highlighting in Org-mode
2755 :group 'org-font-lock
2761 (face :tag "Font-lock-face")
2771 :group 'org-font-lock)
2773 (defun org-compatible-face (specs)
2774 "Make a compatible face specification.
2798 The forground color of this face should be equal to the background
2802 (defface org-level-1 ;; font-lock-function-name-face
2803 (org-compatible-face
2813 (defface org-level-2 ;; font-lock-variable-name-face
2814 (org-compatible-face
2823 (defface org-level-3 ;; font-lock-keyword-face
2824 (org-compatible-face
2835 (defface org-level-4 ;; font-lock-comment-face
2836 (org-compatible-face
2847 (defface org-level-5 ;; font-lock-type-face
2848 (org-compatible-face
2855 (defface org-level-6 ;; font-lock-constant-face
2856 (org-compatible-face
2863 (defface org-level-7 ;; font-lock-builtin-face
2864 (org-compatible-face
2871 (defface org-level-8 ;; font-lock-string-face
2872 (org-compatible-face
2879 (defface org-special-keyword ;; font-lock-string-face
2880 (org-compatible-face
2887 (defface org-warning ;; font-lock-warning-face
2888 (org-compatible-face
2897 (defface org-headline-done ;; font-lock-string-face
2898 (org-compatible-face
2903 This face is only used if `org-fontify-done-headline' is set."
2907 (org-compatible-face
2938 (defface org-todo ;; font-lock-warning-face
2939 (org-compatible-face
2948 (defface org-done ;; font-lock-type-face
2949 (org-compatible-face
2957 (defface org-table ;; font-lock-function-name-face
2958 (org-compatible-face
2969 (org-compatible-face
2979 (org-compatible-face
2988 (org-compatible-face
2998 (org-compatible-face
3007 (defface org-time-grid ;; font-lock-variable-name-face
3008 (org-compatible-face
3084 (defconst org-rm-props '(invisible t face t keymap t intangible t mouse-face t
3199 '(face t fontified t) arch)))
3279 (org-set-font-lock-defaults)))
3303 (defvar font-lock-unfontify-region-function)
3372 (defun org-overlay-display (ovl text &optional face evap)
3373 "Make overlay OVL display TEXT with face FACE."
3376 (and face (set-glyph-face gl face))
3380 (if face (overlay-put ovl 'face face))
3382 (defun org-overlay-before-string (ovl text &optional face evap)
3383 "Make overlay OVL display TEXT with face FACE."
3386 (and face (set-glyph-face gl face))
3388 (if face (org-add-props text nil 'face face))
3538 (org-set-local 'font-lock-unfontify-region-function
3618 (define-key org-mouse-map [follow-link] 'mouse-face))
3626 (require 'font-lock)
3711 (defvar org-emph-face nil)
3717 (font-lock-prepend-text-property (match-beginning 2) (match-end 2)
3718 'face
3722 '(font-lock-multiline t))
3731 (list 'mouse-face 'highlight
3742 (list 'mouse-face 'highlight
3767 ;; a lot of overhead for font-lock.
3770 'keymap org-mouse-map 'mouse-face 'highlight
3773 'keymap org-mouse-map 'mouse-face 'highlight
3794 (list 'mouse-face 'highlight
3817 (list 'mouse-face 'highlight
3830 (org-restart-font-lock)))
3842 (defun org-restart-font-lock ()
3843 "Restart font-lock-mode, to force refontification."
3844 (when (and (boundp 'font-lock-mode) font-lock-mode)
3845 (font-lock-mode -1)
3846 (font-lock-mode 1)))
3879 (list 'mouse-face 'highlight
3884 (defun org-font-lock-level ()
3896 (defvar org-font-lock-keywords nil)
3898 (defun org-set-font-lock-defaults ()
3901 (org-font-lock-extra-keywords
3904 '("^\\(\\**\\)\\(\\*\\)\\(.*\\)" (1 (org-get-level-face 1))
3905 (2 (org-get-level-face 2)) (3 (org-get-level-face 3)))
3937 (0 (org-get-checkbox-statistics-face) t)))
3942 '("^#.*" (0 'font-lock-comment-face t))
3957 (setq org-font-lock-extra-keywords (delq nil org-font-lock-extra-keywords))
3958 ;; Now set the full font-lock-keywords
3959 (org-set-local 'org-font-lock-keywords org-font-lock-extra-keywords)
3960 (org-set-local 'font-lock-defaults
3961 '(org-font-lock-keywords t nil nil backward-paragraph))
3962 (kill-local-variable 'font-lock-keywords) nil))
3967 (defun org-get-level-face (n)
3968 "Get the right face for match N in font-lock matching of healdines."
3980 (font-lock-default-unfontify-region beg end)
3986 '(mouse-face t keymap t org-linked-text t
4430 (save-excursion (org-mode) (turn-on-font-lock)))
5170 (defun org-get-checkbox-statistics-face ()
5171 "Select the face for checkbox statistics.
5172 The face will be `org-done' when all relevant boxes are checked. Otherwise
5736 (defvar org-table-last-highlighted-reference nil)
6335 "Show info about the current field, and highlight any reference at point."
6351 (org-show-reference 'local)
6953 (if (and (boundp 'font-lock-mode) font-lock-mode)
6954 (font-lock-fontify-block)))
7488 edited there. This is useful in order to use \\[org-show-reference]
7582 (org-table-make-reference
7591 (org-table-make-reference
7608 (org-table-make-reference x nil numbers lispp))
7764 (error "Formula contains old &row reference, please rewrite using @-syntax")
7767 (defun org-table-make-reference (elements keep-empty numbers lispp)
7930 (define-key org-edit-formulas-map "\C-c?" 'org-show-reference)
7955 ;; Keep global-font-lock-mode from turning on font-lock-mode
7956 (let ((font-lock-global-modes '(not fundamental-mode)))
7958 (org-set-local 'font-lock-global-modes (list 'not major-mode))
7967 (put-text-property 0 (length s) 'face 'font-lock-comment-face s)
7972 (remove-text-properties 0 (length s) '(face nil) s)
7982 (org-show-reference)
8067 (defun org-show-reference (&optional local)
8084 (t (error "No reference at point")))
8163 ((not var) (error "No reference at point"))
8242 (defun org-table-add-rectangle-overlay (beg end &optional face)
8245 (org-overlay-put ov 'face (or face 'secondary-selection))
8248 (defun org-table-highlight-rectangle (&optional beg end face)
8271 (org-table-add-rectangle-overlay beg end face))
8379 (defconst orgtbl-extra-font-lock-keywords
8382 "Extra font-lock-keywords to be added when orgtbl-mode is active.")
8412 (when (fboundp 'font-lock-add-keywords)
8413 (font-lock-add-keywords nil orgtbl-extra-font-lock-keywords)
8414 (org-restart-font-lock))
8421 (when (fboundp 'font-lock-remove-keywords)
8422 (font-lock-remove-keywords nil orgtbl-extra-font-lock-keywords)
8423 (org-restart-font-lock))
9757 'face 'org-warning))))
9769 'face 'org-warning))))
9865 '(face nil mouse-face nil keymap nil fontified nil) s)
11328 (org-overlay-put ov 'face 'secondary-selection)
11426 (props (list 'face nil
11427 'done-face 'org-done
11428 'undone-face nil
11429 'mouse-face 'highlight
11690 (defun org-fast-tag-insert (kwd tags face &optional end)
11691 "Insert KDW, and the TAGS, the latter with face FACE. Also inser END."
11693 (org-add-props (mapconcat 'identity tags " ") nil 'face face)
11704 (insert (org-add-props " Next change exits" nil 'face 'org-warning)))))
11711 (put-text-property 0 (length s) 'face '(secondary-selection org-tag) s)
11730 (i-face 'org-done)
11731 (c-face 'org-tag)
11759 (org-fast-tag-insert "Inherited" inherited i-face "\n")
11760 (org-fast-tag-insert "Current" current c-face "\n\n")
11789 (setq tg (org-add-props tg nil 'face
11791 ((member tg current) c-face)
11792 ((member tg inherited) i-face)
11871 (org-fast-tag-insert "Current" current c-face)
11876 (list 'face
11878 ((member tg current) c-face)
11879 ((member tg inherited) i-face)
11957 (org-overlay-put org-date-ovl 'face 'org-warning)
12163 (eq (get-text-property p 'face) 'org-date))
12170 (org-restart-font-lock)
12187 nil 'mouse-face 'highlight))
12684 '(face secondary-selection))
12951 ;; Keep global-font-lock-mode from turning on font-lock-mode
12952 (org-set-local 'font-lock-global-modes (list 'not major-mode))
13066 (define-key org-agenda-keymap [follow-link] 'mouse-face))
13273 '(face bold) header))
13279 '(face bold))
13291 (org-add-props match nil 'face 'org-warning)
13295 (org-add-props "1 Restrict call to current buffer 0 Restrict call to region or subtree" nil 'face 'org-table)))
13620 '(face org-link))))
13804 (put-text-property s (1- (point)) 'face 'org-level-3))
13827 (put-text-property s (1- (point)) 'face 'org-level-3)
13956 (list 'face 'org-level-3))
13960 (add-text-properties s (1- (point)) (list 'face 'org-level-3))
13997 (put-text-property s (1- (point)) 'face 'org-level-3)
14066 nil 'face 'org-level-3) "\n")
14069 (list 'face 'org-level-3))
14072 (add-text-properties pos (1- (point)) (list 'face 'org-warning))
14082 (add-text-properties pos (1- (point)) (list 'face 'org-level-3)))
14138 nil 'face 'org-level-3) "\n")
14141 (list 'face 'org-level-3))
14144 (add-text-properties pos (1- (point)) (list 'face 'org-warning))
14148 (add-text-properties pos (1- (point)) (list 'face 'org-level-3)))
14290 'mouse-face 'highlight
14447 (let* ((props (list 'face nil
14448 'done-face 'org-done
14450 'mouse-face 'highlight
14505 (let* ((props (list 'face nil
14507 'mouse-face 'highlight
14560 'face (if donep 'org-done 'org-warning)
14561 'undone-face 'org-warning 'done-face 'org-done
14565 'face 'org-scheduled-today
14566 'undone-face 'org-scheduled-today 'done-face 'org-done
14575 (let* ((props (list 'mouse-face 'highlight
14618 'org-marker marker 'org-hd-marker hdmarker 'face 'org-done
14620 'undone-face 'org-warning 'done-face 'org-done)
14628 (props (list 'mouse-face 'highlight
14638 ee txt head face)
14668 (setq face (cond ((<= diff 0) 'org-warning)
14676 'face face 'undone-face face 'done-face 'org-done)
14682 (let* ((props (list 'face 'org-scheduled-previously
14684 'undone-face 'org-scheduled-previously
14685 'done-face 'org-done
14686 'mouse-face 'highlight
14734 (let* ((props (list 'face nil
14736 'mouse-face 'highlight
14925 1 (length (car new)) 'face 'org-time-grid (car new))))
15019 '(face org-todo))))
15024 '(face org-todo) x))
15235 (org-overlay-put org-hl 'face 'highlight)
15543 If FIXFACE is non-nil, the face of each item is modified acording to
15546 props m pl undone-face done-face finish new dotime cat tags)
15560 undone-face (get-text-property (point) 'undone-face)
15561 done-face (get-text-property (point) 'done-face))
15574 (list 'face
15576 undone-face done-face))))
15749 (set-glyph-face gl 'secondary-selection)
15756 'face 'secondary-selection))))
15858 (message "Diary entry: [d]ay [w]eekly [m]onthly [y]early [a]nniversary [b]lock [c]yclic")
17321 this line is also exported in fixed-width font."
19269 (progn (org-add-to-invisibility-spec '(org-link)) (org-restart-font-lock))
19273 (org-remove-from-invisibility-spec '(org-link)) (org-restart-font-lock))
19389 This function expects the position to be visible because it uses font-lock
19392 (let* ((f (get-text-property (point) 'face))
19422 (previous-single-property-change p 'face)
19423 (next-single-property-change p 'face)) clist)))
19434 (previous-single-property-change p 'face)
19435 (next-single-property-change p 'face)) clist))
19438 (previous-single-property-change p 'face)
19439 (next-single-property-change p 'face)) clist))
19621 ;; For reference, this is the default value of adaptive-fill-regexp