From: Emanuel Berg via Users list for the GNU Emacs text editor <help-gnu-emacs@gnu.org>
To: help-gnu-emacs@gnu.org
Subject: Re: font-lock as a single command
Date: Sat, 13 Feb 2021 02:54:57 +0100 [thread overview]
Message-ID: <87zh08buku.fsf@zoho.eu> (raw)
In-Reply-To: trinity-f2e970a1-71a8-4717-a8c0-e40f7338897a-1613177917426@3c-app-mailcom-bs05
Christopher Dimech wrote:
> (defun supinf-raise-cruc (pos)
> "Raise and lower typeface at position POS."
> (unless (or (memq (get-text-property pos 'face)
> '(font-lock-constant-face font-lock-builtin-face))
> ;; Check for backslash quoting
> (let ((odd nil) (pos pos))
> (while (eq (char-before pos) ?\\)
> (setq pos (1- pos) odd (not odd)))
> odd))
> (if (eq (char-after pos) ?^)
> `(face supr-tfc display (raise ,(car deviat-supinf)))
> `(face infr-tfc display (raise ,(cadr deviat-supinf))) )))
Take it one function at a time. Does this work?
--
underground experts united
http://user.it.uu.se/~embe8573
https://dataswamp.org/~incal
next prev parent reply other threads:[~2021-02-13 1:54 UTC|newest]
Thread overview: 30+ messages / expand[flat|nested] mbox.gz Atom feed top
2021-02-12 23:20 font-lock as a single command Christopher Dimech
2021-02-12 23:44 ` Emanuel Berg via Users list for the GNU Emacs text editor
2021-02-12 23:58 ` Christopher Dimech
2021-02-13 0:06 ` Emanuel Berg via Users list for the GNU Emacs text editor
2021-02-13 0:17 ` Christopher Dimech
2021-02-13 0:04 ` Christopher Dimech
2021-02-13 0:08 ` Emanuel Berg via Users list for the GNU Emacs text editor
2021-02-13 0:20 ` Christopher Dimech
2021-02-13 1:50 ` Emanuel Berg via Users list for the GNU Emacs text editor
2021-02-13 0:58 ` Christopher Dimech
2021-02-13 1:13 ` Christopher Dimech
2021-02-13 1:54 ` Emanuel Berg via Users list for the GNU Emacs text editor [this message]
2021-02-13 2:43 ` Christopher Dimech
2021-02-13 2:46 ` Emanuel Berg via Users list for the GNU Emacs text editor
2021-02-13 3:00 ` Christopher Dimech
2021-02-13 3:16 ` Emanuel Berg via Users list for the GNU Emacs text editor
2021-02-13 3:56 ` Christopher Dimech
2021-02-13 4:09 ` Christopher Dimech
2021-02-13 4:21 ` Christopher Dimech
2021-02-13 4:28 ` Emanuel Berg via Users list for the GNU Emacs text editor
2021-02-13 4:31 ` Christopher Dimech
2021-02-13 5:26 ` Emanuel Berg via Users list for the GNU Emacs text editor
2021-02-13 5:29 ` Christopher Dimech
2021-02-13 5:39 ` Christopher Dimech
2021-02-13 5:43 ` Emanuel Berg via Users list for the GNU Emacs text editor
2021-02-13 5:51 ` Christopher Dimech
2021-02-13 6:07 ` Christopher Dimech
2021-02-13 6:20 ` Emanuel Berg via Users list for the GNU Emacs text editor
2021-02-13 6:55 ` Christopher Dimech
2021-02-13 6:58 ` Emanuel Berg via Users list for the GNU Emacs text editor
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87zh08buku.fsf@zoho.eu \
--to=help-gnu-emacs@gnu.org \
--cc=moasenwood@zoho.eu \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.