From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: Stefan Monnier Newsgroups: gmane.emacs.help Subject: Re: slow bibtex menu access Date: Sat, 05 Mar 2005 16:27:00 -0500 Organization: Bell Sympatico Message-ID: <87br9xkcv0.fsf-monnier+gnu.emacs.help@gnu.org> References: <87mztm6vt8.fsf-monnier+gnu.emacs.help@gnu.org> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1110058530 31853 80.91.229.2 (5 Mar 2005 21:35:30 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Sat, 5 Mar 2005 21:35:30 +0000 (UTC) Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Sat Mar 05 22:35:30 2005 Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1D7gvg-0007F0-0M for geh-help-gnu-emacs@m.gmane.org; Sat, 05 Mar 2005 22:35:20 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1D7hF7-0001dz-71 for geh-help-gnu-emacs@m.gmane.org; Sat, 05 Mar 2005 16:55:25 -0500 Original-Path: shelby.stanford.edu!newsfeed.stanford.edu!cyclone.bc.net!news-in.mts.net!nf1.bellglobal.com!nf2.bellglobal.com!news20.bellglobal.com.POSTED!not-for-mail Original-Newsgroups: gnu.emacs.help User-Agent: Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (gnu/linux) Cancel-Lock: sha1:jMVh8ggwymPEmPWGJ10fgm7pUfE= Original-Lines: 55 Original-NNTP-Posting-Host: 67.71.25.242 Original-X-Complaints-To: abuse@sympatico.ca Original-X-Trace: news20.bellglobal.com 1110058020 67.71.25.242 (Sat, 05 Mar 2005 16:27:00 EST) Original-NNTP-Posting-Date: Sat, 05 Mar 2005 16:27:00 EST Original-Xref: shelby.stanford.edu gnu.emacs.help:128997 Original-To: help-gnu-emacs@gnu.org X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org X-MailScanner-To: geh-help-gnu-emacs@m.gmane.org Xref: main.gmane.org gmane.emacs.help:24543 X-Report-Spam: http://spam.gmane.org/gmane.emacs.help:24543 > Thank you, I'd forgotten that (haven't done it in a long time). So I found > the problem, and it was table.el. I had (require 'table) and (require > 'emacs-wiki-table) (the latter requires table.el) in a few places. I have > no idea where and how table.el is causing the problem, but would it be > possible to turn it off (I guess a hook might do it) while in bibtex? > Tables are not needed in bibtex anyway. Setting debug-on-quit and hitting C-g while the menu is being built indicates that the time is actually spent in table--find-row-column. Looking some more at the table.el code, it seems there is a minor logic-thinko bug in it. Can you try the patch below (it's against the Emacs-CVS version of table.el, so you may have to apply the patch by hand). Tak, is my reasoning correct that `table--probe-cell' should return non-nil iff we're inside a table? Stefan --- orig/lisp/textmodes/table.el +++ mod/lisp/textmodes/table.el @@ -1025,13 +1025,13 @@ :help "Insert a text based table at point"] ["Row" table-insert-row :active (and (not buffer-read-only) - (or (table--probe-cell) + (and (table--probe-cell) (save-excursion (table--find-row-column nil t)))) :help "Insert row(s) of cells in table"] ["Column" table-insert-column :active (and (not buffer-read-only) - (or (table--probe-cell) + (and (table--probe-cell) (save-excursion (table--find-row-column 'column t)))) :help "Insert column(s) of cells in table"]) @@ -1077,13 +1077,13 @@ ("Insert" ["Row" table-insert-row :active (and (not buffer-read-only) - (or (table--probe-cell) + (and (table--probe-cell) (save-excursion (table--find-row-column nil t)))) :help "Insert row(s) of cells in table"] ["Column" table-insert-column :active (and (not buffer-read-only) - (or (table--probe-cell) + (and (table--probe-cell) (save-excursion (table--find-row-column 'column t)))) :help "Insert column(s) of cells in table"])