From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: "Sebastien Vauban" Newsgroups: gmane.emacs.bugs Subject: bug#14957: 24.3.50; Flyspell language visible in mode line Date: Wed, 15 Jan 2014 11:13:42 +0100 Organization: Sebastien Vauban Message-ID: <86sispa6y1.fsf@somewhere.org> References: <86y58teatq.fsf@missioncriticalit.com> <87wqmfz96x.fsf@web.de> <86a9hevcyl.fsf@somewhere.org> <86fvor6itj.fsf@somewhere.org> <86bnzeeaga.fsf@somewhere.org> NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: ger.gmane.org 1389780970 23478 80.91.229.3 (15 Jan 2014 10:16:10 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Wed, 15 Jan 2014 10:16:10 +0000 (UTC) Cc: 14957-ubl+/3LiMTaZdePnXv/OxA@public.gmane.org To: Stefan Monnier Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org-mXXj517/zsQ@public.gmane.org Wed Jan 15 11:16:17 2014 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 1W3NWB-0002Ja-S3 for geb-bug-gnu-emacs@m.gmane.org; Wed, 15 Jan 2014 11:16:16 +0100 Original-Received: from localhost ([::1]:53454 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1W3NWB-0005QY-Cb for geb-bug-gnu-emacs@m.gmane.org; Wed, 15 Jan 2014 05:16:15 -0500 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:50159) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1W3NW3-0005Q4-SB for bug-gnu-emacs-mXXj517/zsQ@public.gmane.org; Wed, 15 Jan 2014 05:16:12 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1W3NVy-0006y8-TT for bug-gnu-emacs-mXXj517/zsQ@public.gmane.org; Wed, 15 Jan 2014 05:16:07 -0500 Original-Received: from debbugs.gnu.org ([140.186.70.43]:37039) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1W3NVy-0006xv-Py for bug-gnu-emacs-mXXj517/zsQ@public.gmane.org; Wed, 15 Jan 2014 05:16:02 -0500 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.80) (envelope-from ) id 1W3NVy-0002jN-86 for bug-gnu-emacs-mXXj517/zsQ@public.gmane.org; Wed, 15 Jan 2014 05:16:02 -0500 X-Loop: help-debbugs-mXXj517/zsQ@public.gmane.org Resent-From: "Sebastien Vauban" Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs-mXXj517/zsQ@public.gmane.org Resent-Date: Wed, 15 Jan 2014 10:16:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs-mXXj517/zsQ@public.gmane.org X-GNU-PR-Message: followup 14957 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: Original-Received: via spool by 14957-submit-ubl+/3LiMTaZdePnXv/OxA@public.gmane.org id=B14957.138978091710421 (code B ref 14957); Wed, 15 Jan 2014 10:16:02 +0000 Original-Received: (at 14957) by debbugs.gnu.org; 15 Jan 2014 10:15:17 +0000 Original-Received: from localhost ([127.0.0.1]:51058 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1W3NVF-0002i0-2e for submit-ubl+/3LiMTaZdePnXv/OxA@public.gmane.org; Wed, 15 Jan 2014 05:15:17 -0500 Original-Received: from dd5e0353a.access.telenet.be ([213.224.53.58]:42599 helo=mail.missioncriticalit.com) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1W3NVB-0002hq-Cw for 14957-ubl+/3LiMTaZdePnXv/OxA@public.gmane.org; Wed, 15 Jan 2014 05:15:15 -0500 Original-Received: from MUNDANEUM.i-did-not-set--mail-host-address--so-tickle-me (unknown [10.10.10.51]) by mail.missioncriticalit.com (Postfix) with ESMTPS id EF7C5500659; Wed, 15 Jan 2014 11:17:53 +0100 (CET) X-Url: Under construction... X-Archive: encrypt In-Reply-To: (Stefan Monnier's message of "Tue, 14 Jan 2014 16:33:05 -0500") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.3.50 (windows-nt) X-BeenThere: debbugs-submit-ubl+/3LiMTaZdePnXv/OxA@public.gmane.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-mXXj517/zsQ@public.gmane.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-mXXj517/zsQ@public.gmane.org Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org-mXXj517/zsQ@public.gmane.org Xref: news.gmane.org gmane.emacs.bugs:83525 Archived-At: Stefan Monnier wrote: >> (defconst csv-mode-line-help-echo (get-text-property 0 (quote help-echo) >> (car default-mode-line-format)) "Primary default mode line help echo text.") > > This is clearly a bug in csv-mode.el. > Try the patch below, It does work like expected. Thanks! > diff --git a/packages/csv-mode/csv-mode.el b/packages/csv-mode/csv-mode.el > index dbc6182..a8ae4e4 100644 > --- a/packages/csv-mode/csv-mode.el > +++ b/packages/csv-mode/csv-mode.el > @@ -1,6 +1,6 @@ > ;;; csv-mode.el --- Major mode for editing comma/char separated values -*- lexical-binding: t -*- > > -;; Copyright (C) 2003, 2004, 2012, 2013 Free Software Foundation, Inc > +;; Copyright (C) 2003, 2004, 2012, 2013, 2014 Free Software Foundation, Inc > > ;; Author: Francis J. Wright > ;; Time-stamp: <23 August 2004> > @@ -247,10 +247,6 @@ Number of spaces used by `csv-align-fields' after separators." > ;;; Mode definition, key bindings and menu > ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; > > -(defconst csv-mode-line-help-echo > - ;; See bindings.el for details of `mode-line-format' construction. > - (get-text-property 0 'help-echo (car (default-value 'mode-line-format))) > - "Primary default mode line help echo text.") > > (defconst csv-mode-line-format > ;; See bindings.el for details of `mode-line-format' construction. > @@ -260,7 +256,6 @@ Number of spaces used by `csv-align-fields' after separators." > (setcdr x (cons > `(csv-field-index-string > ("" csv-field-index-string > - ;; ,(propertize "--" 'help-echo csv-mode-line-help-echo) > )) > (cdr x)))) > ml) > @@ -803,8 +798,7 @@ Called by `csv-field-index-idle-timer'." > (when (not (eq field csv-field-index-old)) > (setq csv-field-index-old field > csv-field-index-string > - (and field (propertize (format "F%d" field) > - 'help-echo csv-mode-line-help-echo))) > + (and field (format "F%d" field))) > (force-mode-line-update)))))) > > ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Best regards, Seb -- Sebastien Vauban