From: Andreas Roehler <andreas.roehler@easy-emacs.de>
Cc: Juri Linkov <juri@jurta.org>, Nick Roberts <nickrob@snap.net.nz>,
emacs-devel <emacs-devel@gnu.org>,
Stefan Monnier <monnier@iro.umontreal.ca>,
"Kim F. Storm" <storm@cua.dk>
Subject: Re: string-strip
Date: Fri, 24 Nov 2006 16:02:25 +0100 [thread overview]
Message-ID: <45670981.9050307@easy-emacs.de> (raw)
In-Reply-To: <E1GTQAZ-0005wN-BW@fencepost.gnu.org>
Richard Stallman schrieb:
> We could install string-strip after the release, but let's not do it now.
>
What about to split the regexp into parts? Thus it's
easier to change values.
Regards
__
Andreas Roehler
;;;
;; (setq strip-chars-before "\\`[[:space:],;\/\n]*")
;; (setq strip-chars-after "[[:space:],;\n]*\\'")
;; (setq string-strip-preserve "\\(\\(?:.\\|\n\\)*?\\)")
(defcustom strip-chars-before "\\`[[:space:]\n]*"
"Regexp indicating which chars shall be stripped before STRING - which
is defined by `string-strip-preserve'"
:type 'string
:group 'convenience)
(defcustom strip-chars-after "[[:space:]\n]*\\'"
"Regexp indicating which chars shall be stripped after STRING - which
is defined by `string-strip-preserve'"
:type 'string
:group 'convenience)
(defcustom string-strip-preserve "\\(\\(?:.\\|\n\\)*?\\)"
"Regexp indicating which chars shall be constitutents of STRING
thus being preserved - whereas `strip-chars-after' and
`strip-chars-before' indicate what class of chars to strip from
beginning or end of STRING"
:type 'string
:group 'convenience)
(defun string-strip (str)
"Return a copy of STR with leading and trailing CHARS removed.
Customize `strip-chars-before' and `strip-chars-after' respectively.
Default is `[[:space:]\n]*', i.e. spaces, tabs and newlines."
(interactive)
(save-match-data
(string-match
(concat strip-chars-before string-strip-preserve strip-chars-after) str)
(match-string 1 str)))
next prev parent reply other threads:[~2006-11-24 15:02 UTC|newest]
Thread overview: 35+ messages / expand[flat|nested] mbox.gz Atom feed top
2006-06-16 8:07 string-strip Andreas Roehler
2006-06-19 7:42 ` string-strip Richard Stallman
2006-06-19 17:59 ` string-strip Lars Hansen
2006-06-19 18:24 ` string-strip Stuart D. Herring
2006-06-19 20:20 ` string-strip Lars Hansen
2006-06-19 20:23 ` string-strip Andreas Schwab
2006-06-19 22:04 ` string-strip Kim F. Storm
2006-06-19 23:19 ` string-strip Richard Stallman
2006-06-20 6:34 ` string-strip Lars Hansen
2006-06-20 17:55 ` string-strip Richard Stallman
2006-06-20 19:28 ` string-strip Andreas Roehler
2006-06-20 19:50 ` string-strip Nick Roberts
2006-06-20 22:03 ` string-strip Kim F. Storm
2006-06-20 22:25 ` string-strip Nick Roberts
2006-06-20 22:42 ` string-strip Johan Bockgård
2006-06-21 16:47 ` string-strip Lars Hansen
2006-06-22 9:15 ` string-strip Kim F. Storm
2006-06-22 11:21 ` string-strip Andreas Roehler
2006-06-22 15:48 ` string-strip Kim F. Storm
2006-06-28 11:52 ` string-strip Lars Hansen
2006-06-28 14:47 ` string-strip Juri Linkov
2006-06-29 13:00 ` string-strip Richard Stallman
2006-07-02 16:03 ` string-strip Stefan Monnier
2006-07-03 9:58 ` string-strip Lars Hansen
2006-07-06 22:22 ` string-strip Stefan Monnier
2006-07-07 19:31 ` string-strip Richard Stallman
2006-07-08 3:59 ` string-strip Stefan Monnier
2006-07-08 20:57 ` string-strip Richard Stallman
2006-09-29 7:41 ` string-strip Andreas Roehler
2006-09-29 14:22 ` string-strip Lars Hansen
2006-09-29 18:40 ` string-strip Andreas Roehler
2006-09-29 21:45 ` string-strip Richard Stallman
2006-11-24 15:02 ` Andreas Roehler [this message]
2006-11-25 6:58 ` string-strip Richard Stallman
-- strict thread matches above, loose matches on Subject: below --
2006-06-20 10:26 string-strip Andreas Roehler
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=45670981.9050307@easy-emacs.de \
--to=andreas.roehler@easy-emacs.de \
--cc=emacs-devel@gnu.org \
--cc=juri@jurta.org \
--cc=monnier@iro.umontreal.ca \
--cc=nickrob@snap.net.nz \
--cc=storm@cua.dk \
/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.