From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!.POSTED.blaine.gmane.org!not-for-mail From: Andreas Schwab Newsgroups: gmane.emacs.bugs Subject: bug#35967: [PATCH] avoid flyspell error if point is at bob Date: Fri, 14 Jun 2019 21:14:15 +0200 Message-ID: <87pnngdlo8.fsf@igel.home> References: <87h89e8g3a.fsf@gmail.com> <83pno1xmz1.fsf@gnu.org> <857e9sb48z.fsf@gmail.com> <83d0jk9oft.fsf@gnu.org> <87tvcsqbes.fsf@gmail.com> <858su4c92c.fsf@gmail.com> <87pnngqaau.fsf@gmail.com> Mime-Version: 1.0 Content-Type: text/plain Injection-Info: blaine.gmane.org; posting-host="blaine.gmane.org:195.159.176.226"; logging-data="216353"; mail-complaints-to="usenet@blaine.gmane.org" User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/26.2.90 (gnu/linux) Cc: 35967@debbugs.gnu.org, npostavs@gmail.com To: Alex Branham Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Fri Jun 14 21:17:41 2019 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([209.51.188.17]) by blaine.gmane.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.89) (envelope-from ) id 1hbrhj-000u3f-FT for geb-bug-gnu-emacs@m.gmane.org; Fri, 14 Jun 2019 21:17:40 +0200 Original-Received: from localhost ([::1]:54550 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.86_2) (envelope-from ) id 1hbrhc-0002yK-UH for geb-bug-gnu-emacs@m.gmane.org; Fri, 14 Jun 2019 15:17:32 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:38446) by lists.gnu.org with esmtp (Exim 4.86_2) (envelope-from ) id 1hbrfK-0000nG-VB for bug-gnu-emacs@gnu.org; Fri, 14 Jun 2019 15:15:11 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1hbrfJ-0008UJ-2c for bug-gnu-emacs@gnu.org; Fri, 14 Jun 2019 15:15:10 -0400 Original-Received: from debbugs.gnu.org ([209.51.188.43]:52500) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1hbrfC-0008PK-Rs for bug-gnu-emacs@gnu.org; Fri, 14 Jun 2019 15:15:04 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1hbrfC-0006qM-KM for bug-gnu-emacs@gnu.org; Fri, 14 Jun 2019 15:15:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Andreas Schwab Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Fri, 14 Jun 2019 19:15:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 35967 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: patch Original-Received: via spool by 35967-submit@debbugs.gnu.org id=B35967.156053966426246 (code B ref 35967); Fri, 14 Jun 2019 19:15:02 +0000 Original-Received: (at 35967) by debbugs.gnu.org; 14 Jun 2019 19:14:24 +0000 Original-Received: from localhost ([127.0.0.1]:37810 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1hbreZ-0006pF-OQ for submit@debbugs.gnu.org; Fri, 14 Jun 2019 15:14:24 -0400 Original-Received: from mail-out.m-online.net ([212.18.0.10]:56163) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1hbreX-0006p6-Co for 35967@debbugs.gnu.org; Fri, 14 Jun 2019 15:14:22 -0400 Original-Received: from frontend01.mail.m-online.net (unknown [192.168.8.182]) by mail-out.m-online.net (Postfix) with ESMTP id 45QVf41fHNz1rYjh; Fri, 14 Jun 2019 21:14:19 +0200 (CEST) Original-Received: from localhost (dynscan1.mnet-online.de [192.168.6.70]) by mail.m-online.net (Postfix) with ESMTP id 45QVf30Tfxz1qqkS; Fri, 14 Jun 2019 21:14:19 +0200 (CEST) X-Virus-Scanned: amavisd-new at mnet-online.de Original-Received: from mail.mnet-online.de ([192.168.8.182]) by localhost (dynscan1.mail.m-online.net [192.168.6.70]) (amavisd-new, port 10024) with ESMTP id J8zqJn0no3Nu; Fri, 14 Jun 2019 21:14:18 +0200 (CEST) X-Auth-Info: f5pb0DOR9jCW/kwSBnz63VYM0TySi7A8p5EAyonG+1Bp1txrFvtDR1TzGWlmn4WW Original-Received: from igel.home (ppp-46-244-172-177.dynamic.mnet-online.de [46.244.172.177]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (No client certificate requested) by mail.mnet-online.de (Postfix) with ESMTPSA; Fri, 14 Jun 2019 21:14:18 +0200 (CEST) Original-Received: by igel.home (Postfix, from userid 1000) id 069F82C1086; Fri, 14 Jun 2019 21:14:15 +0200 (CEST) X-Yow: Catsup and Mustard all over the place! It's the Human Hamburger! In-Reply-To: <87pnngqaau.fsf@gmail.com> (Alex Branham's message of "Fri, 14 Jun 2019 13:41:29 -0500") X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 209.51.188.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" Xref: news.gmane.org gmane.emacs.bugs:160570 Archived-At: On Jun 14 2019, Alex Branham wrote: > diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el > index d18916dfd0..22f9db4363 100644 > --- a/lisp/textmodes/flyspell.el > +++ b/lisp/textmodes/flyspell.el > @@ -423,9 +423,10 @@ flyspell-prog-text-faces > > (defun flyspell-generic-progmode-verify () > "Used for `flyspell-generic-check-word-predicate' in programming modes." > - ;; (point) is next char after the word. Must check one char before. > - (let ((f (get-text-property (- (point) 1) 'face))) > - (memq f flyspell-prog-text-faces))) > + (unless (eql (point) (point-min)) > + ;; (point) is next char after the word. Must check one char before. > + (let ((f (get-text-property (- (point) 1) 'face))) Perhaps change this to (1- (point)). Andreas. -- Andreas Schwab, schwab@linux-m68k.org GPG Key fingerprint = 7578 EB47 D4E5 4D69 2510 2552 DF73 E780 A9DA AEC1 "And now for something completely different."