Advertisement
rogersjcaleb

Untitled

Feb 25th, 2020
345
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.77 KB | None | 0 0
  1. ========================
  2. === Font Lock Studio ===
  3. ========================
  4. --------------------------------------------------
  5. "^\\*+ "
  6. (0
  7. (let*
  8. ((level
  9. (-
  10. (match-end 0)
  11. (match-beginning 0)
  12. 1))
  13. (is-inline-task
  14. (and
  15. (boundp 'org-inlinetask-min-level)
  16. (>= level org-inlinetask-min-level))))
  17. (compose-region
  18. (-
  19. (match-end 0)
  20. 2)
  21. (-
  22. (match-end 0)
  23. 1)
  24. (org-bullets-level-char level))
  25. (when is-inline-task
  26. (compose-region
  27. (-
  28. (match-end 0)
  29. 3)
  30. (-
  31. (match-end 0)
  32. 2)
  33. (org-bullets-level-char level)))
  34. (when
  35. (facep org-bullets-face-name)
  36. (put-text-property
  37. (-
  38. (match-end 0)
  39. (if is-inline-task 3 2))
  40. (-
  41. (match-end 0)
  42. 1)
  43. 'face org-bullets-face-name))
  44. (put-text-property
  45. (match-beginning 0)
  46. (-
  47. (match-end 0)
  48. 2)
  49. 'face
  50. (list :foreground
  51. (face-attribute 'default :background)))
  52. (put-text-property
  53. (match-beginning 0)
  54. (match-end 0)
  55. 'keymap org-bullets-bullet-map)
  56. nil))
  57. --------------------------------------------------
  58. "\\(@@html:<kbd>@@\\) \\(.*\\) \\(@@html:</kbd>@@\\)"
  59. (1 font-lock-comment-face prepend)
  60. (2 font-lock-function-name-face)
  61. (3 font-lock-comment-face prepend)
  62. --------------------------------------------------
  63. org-font-lock-hook
  64. (0 nil)
  65. --------------------------------------------------
  66. "^\\(\\**\\)\\(\\* \\)\\(.*\\)"
  67. (1
  68. (org-get-level-face 1))
  69. (2
  70. (org-get-level-face 2))
  71. (3
  72. (org-get-level-face 3))
  73. --------------------------------------------------
  74. "^[ \t]*\\(\\(|\\|\\+-[-+]\\).*\\S-\\)"
  75. (1 'org-table t)
  76. --------------------------------------------------
  77. "^[ \t]*|\\(?:.*?|\\)? *\\(:?=[^|
  78. ]*\\)"
  79. (1 'org-formula t)
  80. --------------------------------------------------
  81. "^[ \t]*| *\\([#*]\\) *|"
  82. (1 'org-formula t)
  83. --------------------------------------------------
  84. "^[ \t]*|\\( *\\([$!_^/]\\) *|.*\\)|"
  85. (1 'org-formula t)
  86. --------------------------------------------------
  87. "| *\\(<[lrc]?[0-9]*>\\)"
  88. (1 'org-formula t)
  89. --------------------------------------------------
  90. org-fontify-drawers
  91. (0 nil)
  92. --------------------------------------------------
  93. "^\\(?4:[ \t]*\\)\\(?1::\\(?2:\\S-+\\):\\)\\(?:\\(?3:$\\)\\|[ \t]+\\(?3:.*?\\)\\)\\(?5:[ \t]*\\)$"
  94. (1 'org-special-keyword t)
  95. (3 'org-property-value t)
  96. --------------------------------------------------
  97. org-activate-links
  98. (0 nil)
  99. --------------------------------------------------
  100. org-activate-tags
  101. (1 'org-tag prepend)
  102. --------------------------------------------------
  103. org-activate-target-links
  104. (1 'org-link t)
  105. --------------------------------------------------
  106. org-activate-dates
  107. (0 'org-date t)
  108. --------------------------------------------------
  109. org-activate-footnote-links
  110. (0 nil)
  111. --------------------------------------------------
  112. "<<<\\([^<>
  113.  
  114. \t]\\|[^<>
  115.  
  116. \t][^<>
  117.  
  118. ]*[^<>
  119.  
  120. \t]\\)>>>\\|<<\\([^<>
  121.  
  122. \t]\\|[^<>
  123.  
  124. \t][^<>
  125.  
  126. ]*[^<>
  127.  
  128. \t]\\)>>"
  129. (0 'org-target t)
  130. --------------------------------------------------
  131. "^&?%%(.*\\|<%%([^>
  132. ]*?>"
  133. (0 'org-sexp-date t)
  134. --------------------------------------------------
  135. org-fontify-macros
  136. (0 nil)
  137. --------------------------------------------------
  138. org-hide-wide-columns
  139. (0 nil append)
  140. --------------------------------------------------
  141. "^\\(\\*+\\)\\(?: +\\(DONE\\|TODO\\)\\)\\(?: +\\(.*?\\)\\)?[ \t]*$"
  142. (2
  143. (org-get-todo-face 2)
  144. t)
  145. --------------------------------------------------
  146. org-font-lock-add-priority-faces
  147. (0 nil)
  148. --------------------------------------------------
  149. org-font-lock-add-tag-faces
  150. (0 nil)
  151. --------------------------------------------------
  152. "\\<DEADLINE:"
  153. (0 'org-special-keyword t)
  154. --------------------------------------------------
  155. "\\<SCHEDULED:"
  156. (0 'org-special-keyword t)
  157. --------------------------------------------------
  158. "\\<CLOSED:"
  159. (0 'org-special-keyword t)
  160. --------------------------------------------------
  161. "\\<CLOCK:"
  162. (0 'org-special-keyword t)
  163. --------------------------------------------------
  164. org-do-emphasis-faces
  165. (0 nil)
  166. --------------------------------------------------
  167. "^[ \t]*\\(?:[-+*]\\|[0-9]+[.)]\\)[ \t]+\\(?:\\[@\\(?:start:\\)?[0-9]+\\][ \t]*\\)?\\(\\[[- X]\\]\\)"
  168. (1 'org-checkbox prepend)
  169. --------------------------------------------------
  170. "\\[\\([0-9]*%\\)\\]\\|\\[\\([0-9]*\\)/\\([0-9]*\\)\\]"
  171. (0
  172. (org-get-checkbox-statistics-face)
  173. t)
  174. --------------------------------------------------
  175. "^[ \t]*[-+*][ \t]+\\(.*?[ \t]+::\\)\\([ \t]+\\|$\\)"
  176. (1 'org-list-dt prepend)
  177. --------------------------------------------------
  178. "^\\*+ \\(.*:ARCHIVE:.*\\)"
  179. (1 'org-archived prepend)
  180. --------------------------------------------------
  181. org-do-latex-and-related
  182. (0 nil)
  183. --------------------------------------------------
  184. org-fontify-entities
  185. (0 nil)
  186. --------------------------------------------------
  187. org-raise-scripts
  188. (0 nil)
  189. --------------------------------------------------
  190. org-activate-code
  191. (1 'org-code t)
  192. --------------------------------------------------
  193. "^\\*+\\(?: +\\(DONE\\|TODO\\)\\)?\\(?: +\\[#[A-Z0-9]\\]\\)? +\\(?9:COMMENT\\)\\(?: \\|$\\)"
  194. (9 'org-special-keyword t)
  195. --------------------------------------------------
  196. org-fontify-meta-lines-and-blocks
  197. (0 nil)
  198. --------------------------------------------------
  199. (lambda
  200. (bound)
  201. (hl-todo--search nil bound))
  202. (1
  203. (hl-todo--get-face)
  204. t t)
  205. ==================================================
  206. Public state:
  207. Debug on error : NO
  208. Debug on quit : NO
  209. Explain rules : YES
  210. Show compiled code : NO
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement