From: Rasmus <rasmus@gmx.us>
To: help-gnu-emacs@gnu.org
Subject: Re: Question about string-match and match-string
Date: Sun, 21 Jul 2013 02:41:49 +0200 [thread overview]
Message-ID: <87siz8lp6a.fsf@gmx.us> (raw)
In-Reply-To: 87d2qcuavi.fsf@gmx.us
Rasmus <rasmus@gmx.us> writes:
>
> (defun rasmus/org-latex-ignore-heading (headline backend info)
> "Strip headline from HEADLINE if it has tag ignoreheading."
> (let* ((tags (org-element-property :tags
> (plist-get
> (text-properties-at
> (- (string-match "\n" headline) 2) headline)
> :parent))))
> (when (and (member-ignore-case "ignoreheading" tags)
> (org-export-derived-backend-p backend 'latex 'ascii))
> (string-match "\\`.*\n.*\n" headline)
> (replace-match "" nil nil headline))))
This one is better. It also doesn't make sense to remove headlines
for plain text as they also has structure like numbers
(defun rasmus/org-latex-ignore-heading (headline backend info)
"Strip headline from HEADLINE if it has tag ignoreheading."
(when (org-export-derived-backend-p backend 'latex)
(let ((tags (org-element-property :tags
(plist-get
(text-properties-at
(or (string-match ".?\\(\\\\hfill\\|}\n\\)" headline) 0) headline)
:parent))))
(when (and tags (member-ignore-case "ignoreheading" tags))
(string-match "\\`.*\n.*\n" headline)
(replace-match "" nil nil headline)))))
--
ツ
next prev parent reply other threads:[~2013-07-21 0:41 UTC|newest]
Thread overview: 12+ messages / expand[flat|nested] mbox.gz Atom feed top
2013-07-17 8:17 Question about string-match and match-string Suvayu Ali
2013-07-17 8:35 ` Suvayu Ali
2013-07-17 8:44 ` Rasmus
2013-07-17 8:55 ` Suvayu Ali
2013-07-18 8:00 ` Julien Cubizolles
2013-07-18 8:33 ` Rasmus
2013-07-20 15:26 ` Julien Cubizolles
2013-07-20 22:25 ` Rasmus
2013-07-21 0:41 ` Rasmus [this message]
2013-07-21 8:15 ` Julien Cubizolles
2013-07-17 8:53 ` Nicolas Richard
2013-07-17 10:02 ` Suvayu Ali
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
List information: https://www.gnu.org/software/emacs/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87siz8lp6a.fsf@gmx.us \
--to=rasmus@gmx.us \
--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.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).