From: Stefan Monnier <monnier@iro.umontreal.ca>
To: help-gnu-emacs@gnu.org
Subject: Re: XKCD/541 compliance, anyone?
Date: Thu, 01 Jan 2015 12:07:49 -0500 [thread overview]
Message-ID: <jwv387ua1g5.fsf-monnier+gmane.emacs.help@gnu.org> (raw)
In-Reply-To: 87k318npmf.fsf@wmi.amu.edu.pl
> (defvar smiley-regex "[:;x>B][,']?-?[]()PD]"
> "This regex should match smileys.")
> (defun make-smileys-punctuation (beg end)
> "Look for smileys between BEG and END position in the buffer, and
> change their syntax property to punctuation."
> (goto-char beg)
> (while (re-search-forward smiley-regex end t)
> (put-text-property (match-beginning 0) (match-end 0) 'syntax-table '(1))))
You can also use
(syntax-propertize-rules (smiley-regex (0 ".")))
> (defun enable-smileys-punctuation ()
> (setq syntax-propertize-function #'make-smileys-punctuation)
Beware: syntax-propertize-function might already be in use, in which
case you should probably use add-function to combine the two.
> (setq parse-sexp-lookup-properties t))
This is not necessary, it will be set by the syntax-propertize function.
> However, it did not work (in text mode); my make-smileys-punctuation
> seems not even to get called.
Right, syntax-propertization is done lazily, so if nothing calls
syntax-propertize, then that's that. Usually the main triggers for
syntax-propertize are syntax-ppss and font-lock, but neither is likely
to be used in text-mode. So you'll probably need to arrange for font-lock to
be enabled *and* for font-lock-keywords-only not to be set to t.
> but then again, not in message mode, for instance.
Probably because font-lock-keywords-only is set to t, so font-lock
doesn't end up calling syntax-ppss.
Stefan
next prev parent reply other threads:[~2015-01-01 17:07 UTC|newest]
Thread overview: 24+ messages / expand[flat|nested] mbox.gz Atom feed top
2014-12-04 21:16 XKCD/541 compliance, anyone? Marcin Borkowski
2014-12-04 22:34 ` Stefan Monnier
2014-12-04 23:10 ` Marcin Borkowski
2014-12-05 22:33 ` Marcin Borkowski
2014-12-05 23:41 ` Artur Malabarba
2014-12-05 23:48 ` Marcin Borkowski
2014-12-31 9:19 ` Marcin Borkowski
2015-01-01 17:07 ` Stefan Monnier [this message]
2015-01-01 21:41 ` Marcin Borkowski
2015-01-02 4:07 ` Stefan Monnier
2015-01-02 10:09 ` Marcin Borkowski
2015-01-03 1:47 ` Stefan Monnier
2015-01-07 21:55 ` Marcin Borkowski
2015-01-02 14:39 ` Marcin Borkowski
2015-01-03 1:49 ` Stefan Monnier
2015-01-07 22:09 ` Marcin Borkowski
2015-01-07 22:37 ` Stefan Monnier
2015-01-08 1:09 ` Marcin Borkowski
2015-01-08 1:49 ` Stefan Monnier
2015-01-08 2:37 ` Marcin Borkowski
[not found] ` <mailman.17449.1420684651.1147.help-gnu-emacs@gnu.org>
2015-01-08 3:11 ` Stefan Monnier
2015-01-08 14:10 ` Marcin Borkowski
2015-03-15 1:40 ` Marcin Borkowski
2015-03-15 18:39 ` Stefan Monnier
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=jwv387ua1g5.fsf-monnier+gmane.emacs.help@gnu.org \
--to=monnier@iro.umontreal.ca \
--cc=help-gnu-emacs@gnu.org \
/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.