Tags right alignment with font-lock

Tags right alignment with font-lock

[Nicolas P. Rougier (inria)]

Hello,

I'm using font lock to have tags right aligned with the following 
code:

;; Right alignment (char wise)
(add-to-list 'font-lock-extra-managed-props 'display)
(font-lock-add-keywords 'org-mode
  `(("^\\*+.*?\\( \\)\\(:[[:alnum:]_@#%:]+:\\)$"
     (1 `(face nil
               display (space :align-to (- right 3
                                           ,(org-string-width 
                                           (match-string 2)))))
        prepend))) t)

;; Right alignment (pixel wise)
;;(font-lock-add-keywords 'org-mode
;;   `(("^\\*+.*?\\( \\)\\(:[[:alnum:]_@#%:]+:\\)$"
;;      (1 `(face nil
;;                display (space :align-to (- right 3
;;                                            (,(org-string-width 
                                              (match-string 2) 
                                              t)))))
;;         prepend))) t)

I've not tested it thoroughly but it seems to be working 
reasonably well on my machine. It is pretty similar to the code 
posted by Ihor Radchenko (thread on "variable-pitch-mode misaligns 
org-mode heading tags") and I wonder if there are any drawback 
with such techniques (too slow? does not work on all situations?)

Nicolas

-- 
Nicolas P. Rougier —— www.labri.fr/perso/nrougier
Institute of Neurodegenerative Diseases, Bordeaux

Re: Tags right alignment with font-lock

[Ihor Radchenko]

"Nicolas P. Rougier (inria)" <nicolas.rougier@inria.fr> writes:

> I'm using font lock to have tags right aligned with the following 
> code:
>
> ;; Right alignment (char wise)
> (add-to-list 'font-lock-extra-managed-props 'display)
> (font-lock-add-keywords 'org-mode
>   `(("^\\*+.*?\\( \\)\\(:[[:alnum:]_@#%:]+:\\)$"
>      (1 `(face nil
>                display (space :align-to (- right 3
>                                            ,(org-string-width 
>                                            (match-string 2)))))
>         prepend))) t)
> ...
> I've not tested it thoroughly but it seems to be working 
> reasonably well on my machine. It is pretty similar to the code 
> posted by Ihor Radchenko (thread on "variable-pitch-mode misaligns 
> org-mode heading tags") and I wonder if there are any drawback 
> with such techniques (too slow? does not work on all situations?)

The above code has problems when you try editing the heading near the
end of the title (before the :align-to space). Especially when the
window is narrow. Also, when `org-auto-align-tags' is nil.

Not that they cannot be solved, but it is not just as trivial as the
above code.

-- 
Ihor Radchenko // yantar92,
Org mode contributor,
Learn more about Org mode at <https://orgmode.org/>.
Support Org development at <https://liberapay.com/org-mode>,
or support my work at <https://liberapay.com/yantar92>

Re: Tags right alignment with font-lock

[Nicolas P. Rougier (inria)]

> The above code has problems when you try editing the heading 
> near the
> end of the title (before the :align-to space). Especially when 
> the
> window is narrow. Also, when `org-auto-align-tags' is nil.
> Not that they cannot be solved, but it is not just as trivial as 
> the
> above code.

Thanks, I noticed the problem and alleviated it by having two 
spaces at end of the title (and set org-tags-column to nil) but I 
see why it's not really usable

Nicolas

-- 
Nicolas P. Rougier —— www.labri.fr/perso/nrougier
Institute of Neurodegenerative Diseases, Bordeaux