From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/62948 Path: news.gmane.org!not-for-mail From: Michael Olson Newsgroups: gmane.emacs.gnus.general Subject: Re: gnus-replace-in-string: Avoid inf-loop in XEmacs Date: Thu, 20 Apr 2006 10:18:19 -0400 Message-ID: <87y7y0wct0.fsf@tuxtanker.mwolson.org> References: NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: multipart/signed; boundary="=-=-="; micalg=pgp-sha1; protocol="application/pgp-signature" X-Trace: sea.gmane.org 1145542876 13976 80.91.229.2 (20 Apr 2006 14:21:16 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Thu, 20 Apr 2006 14:21:16 +0000 (UTC) Original-X-From: ding-owner+m11475=ding+2daccount=gmane.org@lists.math.uh.edu Thu Apr 20 16:21:13 2006 Return-path: Envelope-to: ding-account@gmane.org Original-Received: from malifon.math.uh.edu ([129.7.128.13]) by ciao.gmane.org with esmtp (Exim 4.43) id 1FWa1g-0007EG-C8 for ding-account@gmane.org; Thu, 20 Apr 2006 16:20:56 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu ident=lists) by malifon.math.uh.edu with smtp (Exim 3.20 #1) id 1FWa1f-0001y4-01 for ding-account@gmane.org; Thu, 20 Apr 2006 09:20:55 -0500 Original-Received: from nas01.math.uh.edu ([129.7.128.39]) by malifon.math.uh.edu with esmtp (Exim 3.20 #1) id 1FWZzH-0001xr-00 for ding@lists.math.uh.edu; Thu, 20 Apr 2006 09:18:27 -0500 Original-Received: from quimby.gnus.org ([80.91.224.244]) by nas01.math.uh.edu with esmtp (Exim 4.52) id 1FWZzC-0008Qg-V4 for ding@lists.math.uh.edu; Thu, 20 Apr 2006 09:18:27 -0500 Original-Received: from mailhub128.itcs.purdue.edu ([128.210.5.128]) by quimby.gnus.org with esmtp (Exim 3.35 #1 (Debian)) id 1FWZz7-0001tH-00 for ; Thu, 20 Apr 2006 16:18:17 +0200 Original-Received: from tuxtanker.mwolson.org (hltp-b-164.resnet.purdue.edu [128.211.245.164]) (authenticated bits=0) by mailhub128.itcs.purdue.edu (8.13.6/8.13.4/internal-auth-smtp) with ESMTP id k3KEIFl9012273 (version=TLSv1/SSLv3 cipher=AES256-SHA bits=256 verify=NOT) for ; Thu, 20 Apr 2006 10:18:15 -0400 Original-Received: from mwolson by tuxtanker.mwolson.org with local (Exim 4.60) (envelope-from ) id 1FWZzC-0004EB-Hr for ding@gnus.org; Thu, 20 Apr 2006 10:18:22 -0400 X-Hashcash: 1:20:060420:ding@gnus.org::RBE+RAvPAYR0KEst:0000Bm01 Original-To: ding@gnus.org Face: iVBORw0KGgoAAAANSUhEUgAAADAAAAAwBAMAAAClLOS0AAAAGFBMVEU1QytIVTlZY0dqc1N6 hGGJl3qZpZCtuKXsjxzFAAACW0lEQVR42l2UXXrqIBCGk67Aoe29Ac4CTPDcGwZ73wLdQDOuQLP9 8wHG9hT1Mc6bb/5jp7Xed92TVrqeCYfKRVc+XdfDbqbJ8TixG1UDu2a3xkf2H+z+A6Qn7Xk71AA8 kdJmZg4xpcTshgr2JQSurAswhwDFYQN9r4yxx1BIQqBTBbvqahw9hxRSLOBdFVA89TTOvgSoMaLf ABTWOg5Z8lLRNyD7x4WSVHU1DZurThn2HI9Oa561JhTSDUWxq64YqRlmrcdhA73y3rmJY1okotDT NzDO2XNGZPnS7A4b6NQ8foQFN2eJmEBR7Du1Q/DRh7R4O50BrGmu0F8i49Iya+ScvtDNqkADB8zD pwU9wTu9c8msdNYOO0JvYYyREd9xBOh7zSNc2WMZUYzIDHOpU0Kxe5o9o0eccsr5mNLcwHhC8DoM SQkJ5wbUxAdlbDELEpDbclc8sT2gV2HJIrj/si7hDgzPpY4sqxTV+pWkgt7EGesDIFWUnGuK7pkn erZoieCVZPGcG3jCJimLwS7IVZY4R3mvoNfzoCfOF0mIG1nna+TadAxzgF5u0b3JTaxcmZtCF1dn WSOv63oNl4U3BQCLXOQKWZIHUBWcUci6iuTL7eMOelVAKfp+NkA0kOElN3BbV26AiGZsXEqfa0EQ NtATvTAKCeHh7AEEi4knM6S3HwB2eo1zeZQ5fDbgNkCpbEwh8HUTqYDqwUhIG2NQ/k2WH+CVB9LK aINy0EeAvgF6KRK0wIaPiX8CioRNpQF7X/8EOnoAPpUvrX8DED7t8B/Bv8ErfnpSfxv4B9rx7BDd lxXRAAAAAElFTkSuQmCC Face: iVBORw0KGgoAAAANSUhEUgAAADAAAAAwBAMAAAClLOS0AAAAJFBMVEUUFgYvNBxJSydVVB9o ZCtlaEiLjWygm2GqrI3KzKzw8uT299LIfLKqAAAB6UlEQVR42r3TPW/TQBgH8MeJTmI82yIqTLGN K2WjvvgTYKnrYXrBKQupVFPBRAl4hSFVX5bCEOVlaZFAijOxoFj35bhzHPucdOa/WL6fnsfPyXfA iszSNF2csjJQPHtpOopm6WgHWCRL0sUuMDe+nF6ePgBb+a/guuFDEB4FhHjuLjxLhoEgexucbpAk SRAEbh1Ch3SD4FDYUIHQDYmMIBG/AtqwiRK3akUdFTajCWiKV7MEjEoQBQd6CT5TAd8Soss6QwEx k4fuTaLLZUw8Bbz2o78NsvfS1MlzUwUD9sY6eXKuY+fAIBV4oA30/WbrW4hNT6sqmAUwn3QsS3+M G55mV/tog3bSf/O1Ne1QjYBTAQXEOjc/0dnxLzCwWQFA7+7pfKUNooxq2FCA9u+vOd/Ho+Ut6M0K EDtecM6vBin/YzU3W1+DWOfZZMa/n4DvK38wB5kfvbZvq7AsYBW93ZyiHPrLq/kazqihHoZoma1h PAFlKpGiU3ZhQaMGN3w6FTUrDKCpQKN1xVgAqN8A9iHv9EWsA6oBEo2yd58lgAKIQotncSIBFSWb llocJ8k5AEVsC16LI/0xB3XcV8SWICpYDVxxtCR8clkN4mTY7SYSbPXihNe/5WXKIQgVeJ8uxE16 IWF4mJTyDwQ7dvZPMjJ6AAAAAElFTkSuQmCC In-Reply-To: (Reiner Steib's message of "Thu, 20 Apr 2006 15:07:24 +0200") User-Agent: Gnus/5.110005 (No Gnus v0.5) Emacs/22.0.50 (gnu/linux) X-PMX-Version: 5.1.2.240295 X-PerlMx-Virus-Scanned: Yes X-Spam-Score: -2.5 (--) Precedence: bulk Original-Sender: ding-owner@lists.math.uh.edu Xref: news.gmane.org gmane.emacs.gnus.general:62948 Archived-At: --=-=-= Content-Transfer-Encoding: quoted-printable Reiner Steib writes: > Is it just a wrapper around `replace-in-string' or is it Emacs > implementation of `replace-regexp-in-string'? Hm... Whatever it is, it doesn't seem to work properly. After a bug report from an XEmacs user, I now use the following function to provide this functionality for Emacs Muse. (defun muse-replace-regexp-in-string (regexp replacement text &optional fix= edcase literal) "Replace REGEXP with REPLACEMENT in TEXT. If fourth arg FIXEDCASE is non-nil, do not alter case of replacement text. If fifth arg LITERAL is non-nil, insert REPLACEMENT literally." (cond ((fboundp 'replace-in-string) (replace-in-string text regexp replacement literal)) ((fboundp 'replace-regexp-in-string) (replace-regexp-in-string regexp replacement text fixedcase literal)) (t (let ((repl-len (length replacement)) start) (while (setq start (string-match regexp text start)) (setq start (+ start repl-len) text (replace-match replacement fixedcase literal text)))) text))) This prefers `replace-in-string' to `replace-regexp-in-string'. --=20 Michael Olson -- FSF Associate Member #652 -- http://www.mwolson.org/ Interests: Emacs Lisp, text markup, protocols -- Muse, Planner, ERC, EMMS /` |\ | | | IRC: mwolson on freenode.net: #hcoop, #muse, #PurdueLUG |_] | \| |_| Jabber: mwolson_at_hcoop.net --=-=-= Content-Type: application/pgp-signature -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.2.2 (GNU/Linux) iD8DBQFER5gu+1Ho2POo0xkRAi1vAJ9UgXg7dUPn8MN/VQOC149Jn+shRACgnw5f HzB6HC8MKhxQHaGDGPvX/Kk= =nGOD -----END PGP SIGNATURE----- --=-=-=--