Skip to content

Commit

Permalink
Add: (defface org-ql-view-query)
Browse files Browse the repository at this point in the history
  • Loading branch information
alphapapa committed Sep 11, 2024
1 parent 82f762e commit d574b60
Show file tree
Hide file tree
Showing 3 changed files with 57 additions and 47 deletions.
1 change: 1 addition & 0 deletions README.org
Original file line number Diff line number Diff line change
Expand Up @@ -557,6 +557,7 @@ Simple links may also be written manually in either sexp or non-sexp form, like:
** 0.9-pre

*Additions*
+ Face ~org-ql-view-query~, applied to view queries in header line.
+ Face ~org-ql-view-title~, applied to view titles in header line.
+ Option ~org-ql-view-relative-deadline-prefix~.

Expand Down
8 changes: 8 additions & 0 deletions org-ql-view.el
Original file line number Diff line number Diff line change
Expand Up @@ -59,6 +59,13 @@
"Face for due dates in `org-ql-view' views."
:group 'org-ql-view)

(defface org-ql-view-query nil
"View query in header line.
This face is added to the formatted query after font-lock faces
are applied to it. It may be used, e.g. to reduce the height so
more of it is visible."
:group 'org-ql-view)

(defface org-ql-view-title '((t :weight bold))
"View title in header line."
:group 'org-ql-view)
Expand Down Expand Up @@ -489,6 +496,7 @@ If TITLE, prepend it to the header."
(org-ql-view--font-lock-string 'emacs-lisp-mode)
(s-truncate available-width))
'help-echo buffers-files-formatted))))
(add-face-text-property 0 (length query-propertized) 'org-ql-view-query 'append query-propertized)
(concat title
(when query (propertize "Query:" 'face 'transient-argument))
(when query query-propertized)
Expand Down
95 changes: 48 additions & 47 deletions org-ql.info
Original file line number Diff line number Diff line change
Expand Up @@ -1096,6 +1096,7 @@ File: README.info, Node: 09-pre, Next: 089, Up: Changelog
===========

*Additions*
• Face ‘org-ql-view-query’, applied to view queries in header line.
• Face ‘org-ql-view-title’, applied to view titles in header line.
• Option ‘org-ql-view-relative-deadline-prefix’.

Expand Down Expand Up @@ -2154,53 +2155,53 @@ Node: Links39051
Node: Tips39738
Node: Changelog40062
Node: 09-pre41029
Node: helm-org-ql (1)41801
Node: 08941942
Node: 08843084
Node: 08744160
Node: 08645388
Node: 08545622
Node: 08446278
Node: 08346730
Node: 08247071
Node: 08147464
Node: 0847887
Node: 07450613
Node: 07350838
Node: 07251572
Node: 07152493
Node: 0753304
Node: 06356170
Node: 06256703
Node: 06157010
Node: 0657580
Node: 05260636
Node: 05160938
Node: 0561363
Node: 04962894
Node: 04863176
Node: 04763525
Node: 04663934
Node: 04564342
Node: 04464703
Node: 04365062
Node: 04265265
Node: 04165426
Node: 0465673
Node: 03269774
Node: 03170177
Node: 0370374
Node: 02373674
Node: 02273908
Node: 02174188
Node: 0274393
Node: 0178471
Node: Development78572
Node: Copyright assignment78805
Node: Notes79395
Node: Comparison with Org Agenda searches79559
Node: org-sidebar80448
Node: License80727
Node: helm-org-ql (1)41878
Node: 08942019
Node: 08843161
Node: 08744237
Node: 08645465
Node: 08545699
Node: 08446355
Node: 08346807
Node: 08247148
Node: 08147541
Node: 0847964
Node: 07450690
Node: 07350915
Node: 07251649
Node: 07152570
Node: 0753381
Node: 06356247
Node: 06256780
Node: 06157087
Node: 0657657
Node: 05260713
Node: 05161015
Node: 0561440
Node: 04962971
Node: 04863253
Node: 04763602
Node: 04664011
Node: 04564419
Node: 04464780
Node: 04365139
Node: 04265342
Node: 04165503
Node: 0465750
Node: 03269851
Node: 03170254
Node: 0370451
Node: 02373751
Node: 02273985
Node: 02174265
Node: 0274470
Node: 0178548
Node: Development78649
Node: Copyright assignment78882
Node: Notes79472
Node: Comparison with Org Agenda searches79636
Node: org-sidebar80525
Node: License80804

End Tag Table

Expand Down

0 comments on commit d574b60

Please sign in to comment.