From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Andreas =?UTF-8?Q?R=C3=B6hler?= Newsgroups: gmane.emacs.bugs Subject: bug#20732: in-string-p fails Date: Fri, 05 Jun 2015 12:34:54 +0200 Message-ID: <55717B4E.7000900@easy-emacs.de> References: <55701A18.6050503@easy-emacs.de> <55702162.30808@yandex.ru> <55703B8E.30804@easy-emacs.de> <5570BDC8.1010800@yandex.ru> <55713B27.3040407@easy-emacs.de> NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=utf-8; format=flowed Content-Transfer-Encoding: 8bit X-Trace: ger.gmane.org 1433503530 23805 80.91.229.3 (5 Jun 2015 11:25:30 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Fri, 5 Jun 2015 11:25:30 +0000 (UTC) To: 20732@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Fri Jun 05 13:25:18 2015 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1Z0pkR-0001bH-E8 for geb-bug-gnu-emacs@m.gmane.org; Fri, 05 Jun 2015 13:25:15 +0200 Original-Received: from localhost ([::1]:46368 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Z0p6c-0004d0-DT for geb-bug-gnu-emacs@m.gmane.org; Fri, 05 Jun 2015 06:44:06 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:50289) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Z0p3k-0000MS-53 for bug-gnu-emacs@gnu.org; Fri, 05 Jun 2015 06:41:08 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Z0p3f-000234-6m for bug-gnu-emacs@gnu.org; Fri, 05 Jun 2015 06:41:08 -0400 Original-Received: from debbugs.gnu.org ([140.186.70.43]:59401) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Z0p3f-00022v-3D for bug-gnu-emacs@gnu.org; Fri, 05 Jun 2015 06:41:03 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.80) (envelope-from ) id 1Z0p3e-0006Gn-Nq for bug-gnu-emacs@gnu.org; Fri, 05 Jun 2015 06:41:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Andreas =?UTF-8?Q?R=C3=B6hler?= Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Fri, 05 Jun 2015 10:41:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 20732 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: X-Debbugs-Original-To: bug-gnu-emacs@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.143350082824053 (code B ref -1); Fri, 05 Jun 2015 10:41:02 +0000 Original-Received: (at submit) by debbugs.gnu.org; 5 Jun 2015 10:40:28 +0000 Original-Received: from localhost ([127.0.0.1]:41143 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1Z0p36-0006Fs-6o for submit@debbugs.gnu.org; Fri, 05 Jun 2015 06:40:28 -0400 Original-Received: from eggs.gnu.org ([208.118.235.92]:36417) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1Z0p34-0006Ff-4o for submit@debbugs.gnu.org; Fri, 05 Jun 2015 06:40:26 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Z0p2u-0001nK-Qg for submit@debbugs.gnu.org; Fri, 05 Jun 2015 06:40:20 -0400 Original-Received: from lists.gnu.org ([208.118.235.17]:33939) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Z0p2u-0001nF-Nu for submit@debbugs.gnu.org; Fri, 05 Jun 2015 06:40:16 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:49859) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Z0p2t-0007YL-KG for bug-gnu-emacs@gnu.org; Fri, 05 Jun 2015 06:40:16 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Z0p2o-0001lN-L2 for bug-gnu-emacs@gnu.org; Fri, 05 Jun 2015 06:40:15 -0400 Original-Received: from mout.kundenserver.de ([212.227.126.130]:59387) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Z0p2o-0001kx-Bs for bug-gnu-emacs@gnu.org; Fri, 05 Jun 2015 06:40:10 -0400 Original-Received: from [192.168.178.31] ([77.12.24.28]) by mrelayeu.kundenserver.de (mreue003) with ESMTPSA (Nemesis) id 0LZjFg-1ZUcPn3i0K-00lUiT for ; Fri, 05 Jun 2015 12:35:08 +0200 User-Agent: Mozilla/5.0 (X11; Linux i686; rv:31.0) Gecko/20100101 Thunderbird/31.4.0 In-Reply-To: <55713B27.3040407@easy-emacs.de> X-Provags-ID: V03:K0:9BJ7vRfIucd3rebsyu8cRqOBD0bPakMi/Fitns+oD+NSXPt9pcB heANPRT0IHJu7vTz/dj/H7XCXjpcYwwdjJoGyC/or7860jjPxmy8biBd3eF9DXhC4W5ru+P Ihm6sVNBBljpdzJ7ie32RHUbuuA6hfKJKZ0HmI5fW6hhuaqhHX3ST3iVzsbMstnvqfKK+Em 1ppJXX1aNNMINzilZDEiQ== X-UI-Out-Filterresults: notjunk:1; X-detected-operating-system: by eggs.gnu.org: GNU/Linux 3.x [generic] X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.15 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 3.x X-Received-From: 140.186.70.43 X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:103607 Archived-At: Am 05.06.2015 um 08:01 schrieb Andreas Röhler: > Meanwhile think calling "widen" here is a mistake. Rather accept narrowing might change the buffers state WRT in-string-p Here the corrected forms: (defun ar-in-string-p () "Return position, if inside or at opening delimiter. Otherwise return nil. " (interactive) (let* ((pps (parse-partial-sexp (point-min) (point))) (erg (and (nth 3 pps) (nth 8 pps))) (la (unless erg (when (eq (char-syntax (char-after)) 34) (point))))) (setq erg (or erg la)) (when (interactive-p) (message "%s" erg)) erg)) (defun ar-in-string-p-fast () "Returns start position if inside, nil otherwise. " (ignore-errors (nth 8 (parse-partial-sexp (point-min) (point)))))