From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: martin rudalics Newsgroups: gmane.emacs.devel Subject: Re: [bug]org-mode with flyspell-mode freezes emacs Date: Tue, 17 Oct 2006 19:49:00 +0200 Message-ID: <4535178C.8050003@gmx.at> References: <17716.23811.425109.929050@kahikatea.snap.net.nz> <4d08b83ef805bfb7828085d8e1f67daf@science.uva.nl> <9dc86f9fd2c6b2ad03093cb1e92e6aa6@science.uva.nl> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="------------030404080908070802030601" X-Trace: sea.gmane.org 1161107389 2021 80.91.229.2 (17 Oct 2006 17:49:49 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Tue, 17 Oct 2006 17:49:49 +0000 (UTC) Cc: Nick Roberts , rms@gnu.org, emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Tue Oct 17 19:49:45 2006 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1GZt4T-0004K0-BB for ged-emacs-devel@m.gmane.org; Tue, 17 Oct 2006 19:49:45 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1GZt4S-00019H-ID for ged-emacs-devel@m.gmane.org; Tue, 17 Oct 2006 13:49:44 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1GZt4C-00013s-L9 for emacs-devel@gnu.org; Tue, 17 Oct 2006 13:49:28 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1GZt49-0000u7-Nh for emacs-devel@gnu.org; Tue, 17 Oct 2006 13:49:28 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1GZt49-0000tf-Em for emacs-devel@gnu.org; Tue, 17 Oct 2006 13:49:25 -0400 Original-Received: from [213.165.64.20] (helo=mail.gmx.net) by monty-python.gnu.org with smtp (Exim 4.52) id 1GZt4A-0000fp-Oy for emacs-devel@gnu.org; Tue, 17 Oct 2006 13:49:27 -0400 Original-Received: (qmail invoked by alias); 17 Oct 2006 17:49:23 -0000 Original-Received: from N749P020.adsl.highway.telekom.at (EHLO [62.47.37.148]) [62.47.37.148] by mail.gmx.net (mp041) with SMTP; 17 Oct 2006 19:49:23 +0200 X-Authenticated: #14592706 User-Agent: Mozilla Thunderbird 1.0 (Windows/20041206) X-Accept-Language: de-DE, de, en-us, en Original-To: Carsten Dominik In-Reply-To: <9dc86f9fd2c6b2ad03093cb1e92e6aa6@science.uva.nl> X-Y-GMX-Trusted: 0 X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:60824 Archived-At: This is a multi-part message in MIME format. --------------030404080908070802030601 Content-Type: text/plain; charset=ISO-8859-15; format=flowed Content-Transfer-Encoding: 7bit > I just found out that the emacs-wiki and muse people have been > struggling with the same problem. Their fix was to use > inhibit-point-motion-hooks. This points into the direction that a > search function gets thrown off into a loop by the point-motion-hooks. Indeed binding `inhibit-point-motion-hooks' is more decent than my earlier proposal. Try the attached patch. --------------030404080908070802030601 Content-Type: text/plain; name="flyspell.patch" Content-Transfer-Encoding: 7bit Content-Disposition: inline; filename="flyspell.patch" *** flyspell.el.~1.106.~ Sat Sep 23 11:08:58 2006 --- flyspell.el Tue Oct 17 19:31:34 2006 *************** *** 959,964 **** --- 959,965 ---- (defun flyspell-word-search-backward (word bound) (save-excursion (let ((r '()) + (inhibit-point-motion-hooks t) p) (while (and (not r) (setq p (search-backward word bound t))) (let ((lw (flyspell-get-word '()))) *************** *** 973,978 **** --- 974,980 ---- (defun flyspell-word-search-forward (word bound) (save-excursion (let ((r '()) + (inhibit-point-motion-hooks t) p) (while (and (not r) (setq p (search-forward word bound t))) (let ((lw (flyspell-get-word '()))) --------------030404080908070802030601 Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Disposition: inline _______________________________________________ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel --------------030404080908070802030601--