From unknown Sun Jun 22 11:38:45 2025 X-Loop: help-debbugs@gnu.org Subject: bug#16620: 24.3.50; Font-lock rule for `ert' does not handle words with dashes (fix included) Resent-From: Anders Lindgren Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sat, 01 Feb 2014 23:38:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 16620 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: To: 16620@debbugs.gnu.org X-Debbugs-Original-To: bug-gnu-emacs@gnu.org Received: via spool by submit@debbugs.gnu.org id=B.139129782314612 (code B ref -1); Sat, 01 Feb 2014 23:38:02 +0000 Received: (at submit) by debbugs.gnu.org; 1 Feb 2014 23:37:03 +0000 Received: from localhost ([127.0.0.1]:45415 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1W9k7R-0003mw-2F for submit@debbugs.gnu.org; Sat, 01 Feb 2014 18:37:03 -0500 Received: from eggs.gnu.org ([208.118.235.92]:52465) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1W9k7N-0003mn-MJ for submit@debbugs.gnu.org; Sat, 01 Feb 2014 18:36:59 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1W9k7L-0001uY-1H for submit@debbugs.gnu.org; Sat, 01 Feb 2014 18:36:57 -0500 X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org X-Spam-Level: X-Spam-Status: No, score=0.8 required=5.0 tests=BAYES_50,FREEMAIL_FROM, HTML_MESSAGE,T_DKIM_INVALID autolearn=disabled version=3.3.2 Received: from lists.gnu.org ([2001:4830:134:3::11]:58854) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1W9k7K-0001uU-Tm for submit@debbugs.gnu.org; Sat, 01 Feb 2014 18:36:54 -0500 Received: from eggs.gnu.org ([2001:4830:134:3::10]:54185) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1W9k7I-00078d-NX for bug-gnu-emacs@gnu.org; Sat, 01 Feb 2014 18:36:54 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1W9k7G-0001uB-Da for bug-gnu-emacs@gnu.org; Sat, 01 Feb 2014 18:36:52 -0500 Received: from mail-oa0-x236.google.com ([2607:f8b0:4003:c02::236]:61399) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1W9k7G-0001u5-4g for bug-gnu-emacs@gnu.org; Sat, 01 Feb 2014 18:36:50 -0500 Received: by mail-oa0-f54.google.com with SMTP id i4so6778962oah.41 for ; Sat, 01 Feb 2014 15:36:49 -0800 (PST) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20120113; h=mime-version:date:message-id:subject:from:to:content-type; bh=5XdiiJGBTA3t7uR71zKgtfXY9p8o6eaM1EBd1NLf88w=; b=IVDBFl2wZz5qlNYmbrPXk/msvQ1IMSwIamUKeo63j2/iULeVhlml1BZdEEv4PRzq5W k2ixjqUjn5/vXJxzYDNCZflKmrNKddTsGnovNAPj3ctOkqDtmlCMjsIQ+AHBJ31IZx+N 0jVEGdcD9c3Cj8Tespw1iR/TPnU01lsJksPdc8OQdZW9ZCUyB8Nz1vagspo03dbjCVt/ yLKuau/RlCg2QxY7njjjrbcLTdcEfHBh03+NsbPGBi0uIpcBvtHJbJXw7IA4rfNjWBg2 YtiRWXeroU7MvOZdGp6MtqM6y4XunfhTylvxf/OCEC6skKJsbhxuDp5P38hbGJzin5L6 lzJA== MIME-Version: 1.0 X-Received: by 10.182.153.226 with SMTP id vj2mr23806316obb.26.1391297809130; Sat, 01 Feb 2014 15:36:49 -0800 (PST) Received: by 10.182.114.199 with HTTP; Sat, 1 Feb 2014 15:36:49 -0800 (PST) Date: Sun, 2 Feb 2014 00:36:49 +0100 Message-ID: From: Anders Lindgren Content-Type: multipart/alternative; boundary=089e013d0dc0b0ad1a04f160c30d X-detected-operating-system: by eggs.gnu.org: Error: Malformed IPv6 address (bad octet value). X-detected-operating-system: by eggs.gnu.org: Error: Malformed IPv6 address (bad octet value). X-Received-From: 2001:4830:134:3::11 X-Spam-Score: -4.0 (----) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.15 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -4.0 (----) --089e013d0dc0b0ad1a04f160c30d Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable The package `ert', adds Font Lock keywords to highlight the `ert-deftest' construct. Unfortunately, the regexp used does not handle the case when the name of the test contains a dash. For example, here only "alpha" is highlighted: (ert-deftest alpha-beta () This could easily be fixed by replacing the original regexp: "(\\(\\\\s *\\(\\sw+\\)?" with (which is the construct used to highlight `defun'): "(\\(\\\\s *\\(\\(?:\\sw\\|\\s_\\)+\\)?" See `ert--activate-font-lock-keywords' in the file `ert.el'. -- Anders In GNU Emacs 24.3.50.4 (x86_64-apple-darwin13.0.0, NS apple-appkit-1265.00) of 2014-01-16 on macpro.lan Repository revision: 116039 eggert@cs.ucla.edu-20140116062406-oh0d3tsfqytj28ta Windowing system distributor `Apple', version 10.3.1265 Configured using: `configure --with-ns' Important settings: value of $LC_CTYPE: UTF-8 locale-coding-system: utf-8-unix Major mode: Font-Lock-Studio Minor modes in effect: shell-dirtrack-mode: t global-auto-revert-mode: t global-cwarn-mode: t minibuffer-electric-file-mode: t recentf-mode: t msb-mode: t display-time-mode: t tooltip-mode: t mouse-wheel-mode: t menu-bar-mode: t file-name-shadow-mode: t global-font-lock-mode: t font-lock-mode: t auto-composition-mode: t auto-encryption-mode: t auto-compression-mode: t buffer-read-only: t column-number-mode: t line-number-mode: t transient-mark-mode: t Recent input: a n SPC t h e SPC s a m e SPC t h e i n g . C-a C-x C-s C-v C-v < C-s e x p l a i n ( C-s C-s C-s C-s C-s C-a < M-f M-f M-f s SPC " e x p l a n a i n " SPC a n d SPC q M-f M-f M-f C-a C-x C-s C-v C-v C-v C-M-e C-M-e C-M-e C-M-e C-M-e C-M-e C-M-e C-M-e C-M-e M-f M-f SPC C-SPC C-M-f w C-a C-x C-s C-x C-f C-x k C-x C-f C-v x f o n t - o l o c s t M-f C-s C-w C-w C-w C-w C-w C-s C-s C-r C-r C-a C-SPC C-SPC w w x e r r e p o r t - e e m Recent messages: Mark set Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|type\\|un\\)\\|def\\= (?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\|face\\|g\\(?:ener= ic\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\\|lobal\\(?:\\(?:i= zed\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|widget\\)\\|m\\(?:acr= o\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alias\\)?\\)\\)\\_>[ \t'(]*\\(\\(?:\\sw\\|\\s_\\)... [+1] [2 times] Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|type\\|un\\)\\|def\\= (?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\|face\\|g\\(?:ener= ic\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\\|lobal\\(?:\\(?:i= zed\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|widget\\)\\|m\\(?:acr= o\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alias\\)?\\)\\)\\_>[ \t'(]*\\(\\(?:\\sw\\|\\s_\\)+\\)... [+1] Mark set Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|type\\|un\\)\\|def\\= (?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\|face\\|g\\(?:ener= ic\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\\|lobal\\(?:\\(?:i= zed\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|widget\\)\\|m\\(?:acr= o\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alias\\)?\\)\\)\\_>[ \t'(]*\\(\\(?:\\sw\\|\\s_\\)+\\)... [+1] Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|type\\|un\\)\\|def\\= (?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\|face\\|g\\(?:ener= ic\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\\|lobal\\(?:\\(?:i= zed\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|widget\\)\\|m\\(?:acr= o\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alias\\)?\\)\\)\\_>[ \t'(]*\\(\\(?:\\sw\\|\\s_\\)... [+1] Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|type\\|un\\)\\|def\\= (?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\|face\\|g\\(?:ener= ic\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\\|lobal\\(?:\\(?:i= zed\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|widget\\)\\|m\\(?:acr= o\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alias\\)?\\)\\)\\_>[ \t'(]*\\(\\(... [-1-] Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|type\\|un\\)\\|def\\= (?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\|face\\|g\\(?:ener= ic\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\\|lobal\\(?:\\(?:i= zed\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|widget\\)\\|m\\(?:acr= o\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alias\\)?\\)\\)\\_>[ \t'(]*\\(... [-1-] Library idna specified by `autoload' does not exist. Library messagexmas specified by `autoload' does not exist. Load-path shadows: /Users/anders/emacs/lisp/table hides /Volumes/HD2/build/emacs8/trunk/nextstep/Emacs.app/Contents/Resources/lisp/= textmodes/table /Users/anders/emacs/lisp/ruby-mode hides /Volumes/HD2/build/emacs8/trunk/nextstep/Emacs.app/Contents/Resources/lisp/= progmodes/ruby-mode /Users/anders/emacs/src/asm-mode-new/src/asm-mode hides /Volumes/HD2/build/emacs8/trunk/nextstep/Emacs.app/Contents/Resources/lisp/= progmodes/asm-mode Features: (shadow sort mail-extr emacsbug message rfc822 mml mml-sec mm-decode mm-bodies mm-encode mailabbrev gmm-utils mailheader sendmail superword subword image-file eieio-opt speedbar sb-image ezimage dframe face-remap mb-depth two-column grep icicles-mode icicles-face icicles-cmd2 icicles-cmd1 imenu icicles-mcmd image-dired format-spec icicles-fn icicles-var icicles-opt ffap cus-theme thingatpt filesets icicles-mac cus-edit yow shell pcomplete cookie1 bookmark compile autoload tar-mode lisp-mnt mail-utils parse-time network-stream starttls url-http tls mail-parse rfc2231 rfc2047 rfc2045 ietf-drums url-gw url-cache url-auth url url-proxy url-privacy url-expand url-methods url-history url-cookie url-domsuf url-util url-parse auth-source eieio byte-opt bytecomp byte-compile cconv eieio-core gnus-util mm-util mail-prsvr password-cache url-vars mailcap finder-inf package mule-util etags cperl-mode edebug sgml-mode rdebug-source rdebug-vars gud ruby-mode font-lock-studio-test ispell cus-start cus-load ctypes end-of-buffer-log doxygen c-electric-operator c-indent-operator cc-langs ert ewoc faceup rect vc-bzr find-func debug sh-script smie executable jka-compr info apropos dired+ dired-x dired-aux pp font-lock-studio derived dired dabbrev follow misearch multi-isearch vc-dispatcher vc-svn help-mode eldoc ps-print ps-def lpr server autorevert filenotify folding-isearch folding view rdebug cwarn prepaint cc-mode cc-fonts cc-guess cc-menus cc-cmds cc-styles cc-align cc-engine cc-vars cc-defs tempo split-nways lockdir project-name ange-ftp comint ansi-color ring paren mic-paren cl-macs gv iso-insert minibuf-elfile easy-mmode recentf tree-widget wid-edit easymenu msb edmacro kmacro disp-table warnings time advice help-fns cl cl-loaddefs cl-lib time-date tooltip electric uniquify ediff-hook vc-hooks lisp-float-type mwheel ns-win tool-bar dnd fontset image regexp-opt fringe tabulated-list newcomment lisp-mode prog-mode register page menu-bar rfn-eshadow timer select scroll-bar mouse jit-lock font-lock syntax facemenu font-core frame cham georgian utf-8-lang misc-lang vietnamese tibetan thai tai-viet lao korean japanese hebrew greek romanian slovak czech european ethiopic indian cyrillic chinese case-table epa-hook jka-cmpr-hook help simple abbrev minibuffer nadvice loaddefs button faces cus-face macroexp files text-properties overlay sha1 md5 base64 format env code-pages mule custom widget hashtable-print-readable backquote make-network-process cocoa ns multi-tty emacs) --089e013d0dc0b0ad1a04f160c30d Content-Type: text/html; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable
The package `ert', adds Font Lock keywords to hig= hlight the `ert-deftest' construct. Unfortunately, the regexp used does= not handle the case when the name of the test contains a dash.

For example, here only "alpha" is highlighted:

=A0 =A0=A0(ert-deftest alpha-beta ()

This could easily be fixed by replacing the original regexp:
=

=A0 =A0=A0"(\\(\\<ert-deftest\\)\\>\\s *\\(\\sw+\= \)?"

with (which is the construct used to hig= hlight `defun'):

=A0 =A0 "(\\(\\<ert-d= eftest\\)\\>\\s *\\(\\(?:\\sw\\|\\s_\\)+\\)?"

See `ert--activate-font-lock-keywords' in the file = `ert.el'.

=A0 =A0 -- Anders

In GNU Emacs 24.3.50.4 (x86_64-apple-darwin13.0.0, NS apple-appkit-1= 265.00)
=A0of 2014-01-16 on macpro.lan
Repository revision: 116039 e= ggert@cs.ucla.edu-20140116062406-oh0d3tsfqytj28ta
Windowing syste= m distributor `Apple', version 10.3.1265
Configured using:
=A0`configure --with-ns'

Important settin= gs:
=A0 value of $LC_CTYPE: UTF-8
=A0 locale-coding-sys= tem: utf-8-unix

Major mode: Font-Lock-Studio
=

Minor modes in effect:
=A0 shell-dirtrack-mode: t<= /div>
=A0 global-auto-revert-mode: t
=A0 global-cwarn-mode: t=
=A0 minibuffer-electric-file-mode: t
=A0 recentf-mode:= t
=A0 msb-mode: t
=A0 display-time-mode: t
=A0 toolt= ip-mode: t
=A0 mouse-wheel-mode: t
=A0 menu-bar-mode: t=
=A0 file-name-shadow-mode: t
=A0 global-font-lock-mode= : t
=A0 font-lock-mode: t
=A0 auto-composition-mode: t
=A0 = auto-encryption-mode: t
=A0 auto-compression-mode: t
= =A0 buffer-read-only: t
=A0 column-number-mode: t
=A0 l= ine-number-mode: t
=A0 transient-mark-mode: t

Recent input:
a n SPC t h e SPC s a m e SPC t h e <backspace> i n=A0
g . C-a C-x C-s C-v C-v <escape> < C-s e x p l a i=A0
= n ( <backspace> C-s C-s C-s C-s C-s C-a <escape> <=A0
<down> <down> <down> <down> <down> <d= own> <down> <down>=A0
<down> <down> &l= t;down> <down> <down> <down> <down> <down>= =A0
<down> <down> <down> <down> <down> <d= own> <down> <down>=A0
<down> <down> &l= t;down> <down> <down> <down> <down> <down>= =A0
<down> <down> <down> <down> <down> <d= own> M-f M-f M-f=A0
s SPC " e x p l a n <backspace>= <backspace> a i n "=A0
SPC a n d SPC <escape> q= M-f M-f M-f <left> <left>=A0
<left> <left> <left> <backspace> C-a C-x C-s C= -v C-v=A0
C-v C-M-e C-M-e C-M-e C-M-e C-M-e C-M-e C-M-e C-M-e=A0<= /div>
C-M-e <down> <down> M-f M-f <right> SPC <bac= kspace>=A0
C-SPC C-M-f <escape> w C-a C-x C-s C-x C-f <down> <retu= rn>=A0
C-x k <return> C-x C-f <up> <return> = C-v <escape> x=A0
f o n t - o <backspace> l o c <t= ab> s t <tab> <return>=A0
<down> <down> M-f <right> C-s C-w C-w C-w C-w C-w C-= s=A0
C-s C-r C-r C-a <up> <up> <down> <down&= gt; <down> <down>=A0
<down> <down> <do= wn> <down> <down> <down> <down> <down>=A0<= /div>
<down> <down> <down> <down> <down> <d= own> <down> <left>=A0
<left> <left> &l= t;left> <left> <left> <left> <left> <left>= =A0
<left> <left> <left> <left> <left> <l= eft> <left> <left>=A0
<left> <left> &l= t;left> <left> <left> <left> <left> <left>= =A0
<left> C-SPC <right> <right> <right> <right= > <left>=A0
<left> <left> <left> <l= eft> <left> <left> C-SPC <right>=A0
<righ= t> <right> <right> <right> <right> <right>= <right>=A0
<right> <right> <right> <right> <right> = <right> <right>=A0
<right> <right> <ri= ght> <right> <right> <right> <right>=A0
<right> <right> <right> <right> <escape> w &l= t;right>=A0
<escape> w <escape> x e r <backspac= e> <backspace> r=A0
e p o r t - e <backspace> e m = <tab> <return>

Recent messages:
Mark set
Matches &= quot;(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|type\\|un\\)\\|d= ef\\(?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\|face\\|g\\(?:= eneric\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\\|lobal\\(?:\\= (?:ized\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|widget\\)\\|m\\(?= :acro\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alias\\)?\\)\\)\\_= >[ \t'(]*\\(\\(?:\\sw\\|\\s_\\)... [+1] [2 times]
Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|ty= pe\\|un\\)\\|def\\(?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\= |face\\|g\\(?:eneric\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\= \|lobal\\(?:\\(?:ized\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|wid= get\\)\\|m\\(?:acro\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alia= s\\)?\\)\\)\\_>[ \t'(]*\\(\\(?:\\sw\\|\\s_\\)+\\)... [+1]
Mark set
Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:tru= c\\|ubs\\)t\\)\\|type\\|un\\)\\|def\\(?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\= \|onst\\|ustom\\)\\|face\\|g\\(?:eneric\\|roup\\)\\|ine-\\(?:derived-mode\\= |g\\(?:\\(?:eneric\\|lobal\\(?:\\(?:ized\\)?-minor\\)\\)-mode\\)\\|minor-mo= de\\|skeleton\\|widget\\)\\|m\\(?:acro\\|ethod\\)\\|subst\\|theme\\|un\\|va= r\\(?:-local\\|alias\\)?\\)\\)\\_>[ \t'(]*\\(\\(?:\\sw\\|\\s_\\)+\\)= ... [+1]
Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|ty= pe\\|un\\)\\|def\\(?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\= |face\\|g\\(?:eneric\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\= \|lobal\\(?:\\(?:ized\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|wid= get\\)\\|m\\(?:acro\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alia= s\\)?\\)\\)\\_>[ \t'(]*\\(\\(?:\\sw\\|\\s_\\)... [+1]
Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|ty= pe\\|un\\)\\|def\\(?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\= |face\\|g\\(?:eneric\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\= \|lobal\\(?:\\(?:ized\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|wid= get\\)\\|m\\(?:acro\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alia= s\\)?\\)\\)\\_>[ \t'(]*\\(\\(... [-1-]
Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|ty= pe\\|un\\)\\|def\\(?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\= |face\\|g\\(?:eneric\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\= \|lobal\\(?:\\(?:ized\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|wid= get\\)\\|m\\(?:acro\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alia= s\\)?\\)\\)\\_>[ \t'(]*\\(... [-1-]
Library idna specified by `autoload' does not exist.
Lib= rary messagexmas specified by `autoload' does not exist.

=
Load-path shadows:
/Users/anders/emacs/lisp/table hide= s /Volumes/HD2/build/emacs8/trunk/nextstep/Emacs.app/Contents/Resources/lis= p/textmodes/table
/Users/anders/emacs/lisp/ruby-mode hides /Volumes/HD2/build/emacs8/tru= nk/nextstep/Emacs.app/Contents/Resources/lisp/progmodes/ruby-mode
/Users/anders/emacs/src/asm-mode-new/src/asm-mode hides /Volumes/HD2/build= /emacs8/trunk/nextstep/Emacs.app/Contents/Resources/lisp/progmodes/asm-mode=

Features:
(shadow sort mail-extr emacsbug mes= sage rfc822 mml mml-sec mm-decode
mm-bodies mm-encode mailabbrev = gmm-utils mailheader sendmail superword
subword image-file eieio-= opt speedbar sb-image ezimage dframe face-remap
mb-depth two-column grep icicles-mode icicles-face icicles-cmd2
<= div>icicles-cmd1 imenu icicles-mcmd image-dired format-spec icicles-fn
icicles-var icicles-opt ffap cus-theme thingatpt filesets icicles-mac=
cus-edit yow shell pcomplete cookie1 bookmark compile autoload tar-mod= e
lisp-mnt mail-utils parse-time network-stream starttls url-http= tls
mail-parse rfc2231 rfc2047 rfc2045 ietf-drums url-gw url-cac= he url-auth
url url-proxy url-privacy url-expand url-methods url-history url-cooki= e
url-domsuf url-util url-parse auth-source eieio byte-opt byteco= mp
byte-compile cconv eieio-core gnus-util mm-util mail-prsvr
password-cache url-vars mailcap finder-inf package mule-util etags
cperl-mode edebug sgml-mode rdebug-source rdebug-vars gud ruby-mode<= /div>
font-lock-studio-test ispell cus-start cus-load ctypes end-of-buf= fer-log
doxygen c-electric-operator c-indent-operator cc-langs ert ewoc faceup=
rect vc-bzr find-func debug sh-script smie executable jka-compr = info
apropos dired+ dired-x dired-aux pp font-lock-studio derived= dired
dabbrev follow misearch multi-isearch vc-dispatcher vc-svn help-mode
eldoc ps-print ps-def lpr server autorevert filenotify folding-ise= arch
folding view rdebug cwarn prepaint cc-mode cc-fonts cc-guess= cc-menus
cc-cmds cc-styles cc-align cc-engine cc-vars cc-defs tempo split-nways=
lockdir project-name ange-ftp comint ansi-color ring paren mic-p= aren
cl-macs gv iso-insert minibuf-elfile easy-mmode recentf tree= -widget
wid-edit easymenu msb edmacro kmacro disp-table warnings time advice
help-fns cl cl-loaddefs cl-lib time-date tooltip electric uniquify=
ediff-hook vc-hooks lisp-float-type mwheel ns-win tool-bar dnd f= ontset
image regexp-opt fringe tabulated-list newcomment lisp-mode prog-mode<= /div>
register page menu-bar rfn-eshadow timer select scroll-bar mouse<= /div>
jit-lock font-lock syntax facemenu font-core frame cham georgian<= /div>
utf-8-lang misc-lang vietnamese tibetan thai tai-viet lao korean
=
japanese hebrew greek romanian slovak czech european ethiopic indian
cyrillic chinese case-table epa-hook jka-cmpr-hook help simple abb= rev
minibuffer nadvice loaddefs button faces cus-face macroexp files
=
text-properties overlay sha1 md5 base64 format env code-pages mule
custom widget hashtable-print-readable backquote make-network-proces= s
cocoa ns multi-tty emacs)

--089e013d0dc0b0ad1a04f160c30d-- From debbugs-submit-bounces@debbugs.gnu.org Sat Feb 01 19:17:31 2014 Received: (at control) by debbugs.gnu.org; 2 Feb 2014 00:17:31 +0000 Received: from localhost ([127.0.0.1]:45453 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1W9kkc-0004oX-Hn for submit@debbugs.gnu.org; Sat, 01 Feb 2014 19:17:30 -0500 Received: from fencepost.gnu.org ([208.118.235.10]:41181) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1W9kka-0004oO-FJ for control@debbugs.gnu.org; Sat, 01 Feb 2014 19:17:28 -0500 Received: from rgm by fencepost.gnu.org with local (Exim 4.71) (envelope-from ) id 1W9kka-0003F4-5Q for control@debbugs.gnu.org; Sat, 01 Feb 2014 19:17:28 -0500 Date: Sat, 01 Feb 2014 19:17:28 -0500 Message-Id: Subject: control message for bug 16480 To: X-Mailer: mail (GNU Mailutils 2.1) From: Glenn Morris X-Spam-Score: -5.5 (-----) X-Debbugs-Envelope-To: control X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.15 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -5.5 (-----) merge 16620 16480 From unknown Sun Jun 22 11:38:45 2025 MIME-Version: 1.0 X-Mailer: MIME-tools 5.503 (Entity 5.503) X-Loop: help-debbugs@gnu.org From: help-debbugs@gnu.org (GNU bug Tracking System) To: Anders Lindgren Subject: bug#16620: closed (Re: bug#16620: 24.3.50; Font-lock rule for `ert' does not handle words with dashes (fix included)) Message-ID: References: X-Gnu-PR-Message: they-closed 16620 X-Gnu-PR-Package: emacs X-Gnu-PR-Keywords: confirmed Reply-To: 16620@debbugs.gnu.org Date: Tue, 04 Feb 2014 17:39:03 +0000 Content-Type: multipart/mixed; boundary="----------=_1391535543-3549-1" This is a multi-part message in MIME format... ------------=_1391535543-3549-1 Content-Disposition: inline Content-Transfer-Encoding: quoted-printable Content-Type: text/plain; charset="utf-8" Your bug report #16620: 24.3.50; Font-lock rule for `ert' does not handle words with dashes= (fix included) which was filed against the emacs package, has been closed. The explanation is attached below, along with your original report. If you require more details, please reply to 16620@debbugs.gnu.org. --=20 16620: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=3D16620 GNU Bug Tracking System Contact help-debbugs@gnu.org with problems ------------=_1391535543-3549-1 Content-Type: message/rfc822 Content-Disposition: inline Content-Transfer-Encoding: 7bit Received: (at 16620-done) by debbugs.gnu.org; 4 Feb 2014 17:38:04 +0000 Received: from localhost ([127.0.0.1]:49677 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1WAjwh-0000u0-P6 for submit@debbugs.gnu.org; Tue, 04 Feb 2014 12:38:04 -0500 Received: from mercure.iro.umontreal.ca ([132.204.24.67]:60326) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1WAjwf-0000tb-OJ for 16620-done@debbugs.gnu.org; Tue, 04 Feb 2014 12:38:02 -0500 Received: from hidalgo.iro.umontreal.ca (hidalgo.iro.umontreal.ca [132.204.27.50]) by mercure.iro.umontreal.ca (Postfix) with ESMTP id 1105C84E50; Tue, 4 Feb 2014 12:38:01 -0500 (EST) Received: from lechon.iro.umontreal.ca (lechon.iro.umontreal.ca [132.204.27.242]) by hidalgo.iro.umontreal.ca (Postfix) with ESMTP id 3CA4B1E5913; Tue, 4 Feb 2014 12:37:37 -0500 (EST) Received: by lechon.iro.umontreal.ca (Postfix, from userid 20848) id 213D2B40FE; Tue, 4 Feb 2014 12:37:37 -0500 (EST) From: Stefan Monnier To: Anders Lindgren Subject: Re: bug#16620: 24.3.50; Font-lock rule for `ert' does not handle words with dashes (fix included) Message-ID: References: Date: Tue, 04 Feb 2014 12:37:37 -0500 In-Reply-To: (Anders Lindgren's message of "Sun, 2 Feb 2014 00:36:49 +0100") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.3.50 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain X-DIRO-MailScanner-Information: Please contact the ISP for more information X-DIRO-MailScanner: Found to be clean X-DIRO-MailScanner-SpamCheck: n'est pas un polluriel, SpamAssassin (score=-2.82, requis 5, autolearn=not spam, ALL_TRUSTED -2.82, MC_TSTLAST 0.00) X-DIRO-MailScanner-From: monnier@iro.umontreal.ca X-Spam-Status: No X-Spam-Score: -2.9 (--) X-Debbugs-Envelope-To: 16620-done Cc: 16620-done@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.15 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -2.9 (--) > The package `ert', adds Font Lock keywords to highlight the `ert-deftest' > construct. Unfortunately, the regexp used does not handle the case when the > name of the test contains a dash. Thanks, installed, Stefan ------------=_1391535543-3549-1 Content-Type: message/rfc822 Content-Disposition: inline Content-Transfer-Encoding: 7bit Received: (at submit) by debbugs.gnu.org; 1 Feb 2014 23:37:03 +0000 Received: from localhost ([127.0.0.1]:45415 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1W9k7R-0003mw-2F for submit@debbugs.gnu.org; Sat, 01 Feb 2014 18:37:03 -0500 Received: from eggs.gnu.org ([208.118.235.92]:52465) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1W9k7N-0003mn-MJ for submit@debbugs.gnu.org; Sat, 01 Feb 2014 18:36:59 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1W9k7L-0001uY-1H for submit@debbugs.gnu.org; Sat, 01 Feb 2014 18:36:57 -0500 X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org X-Spam-Level: X-Spam-Status: No, score=0.8 required=5.0 tests=BAYES_50,FREEMAIL_FROM, HTML_MESSAGE,T_DKIM_INVALID autolearn=disabled version=3.3.2 Received: from lists.gnu.org ([2001:4830:134:3::11]:58854) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1W9k7K-0001uU-Tm for submit@debbugs.gnu.org; Sat, 01 Feb 2014 18:36:54 -0500 Received: from eggs.gnu.org ([2001:4830:134:3::10]:54185) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1W9k7I-00078d-NX for bug-gnu-emacs@gnu.org; Sat, 01 Feb 2014 18:36:54 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1W9k7G-0001uB-Da for bug-gnu-emacs@gnu.org; Sat, 01 Feb 2014 18:36:52 -0500 Received: from mail-oa0-x236.google.com ([2607:f8b0:4003:c02::236]:61399) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1W9k7G-0001u5-4g for bug-gnu-emacs@gnu.org; Sat, 01 Feb 2014 18:36:50 -0500 Received: by mail-oa0-f54.google.com with SMTP id i4so6778962oah.41 for ; Sat, 01 Feb 2014 15:36:49 -0800 (PST) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20120113; h=mime-version:date:message-id:subject:from:to:content-type; bh=5XdiiJGBTA3t7uR71zKgtfXY9p8o6eaM1EBd1NLf88w=; b=IVDBFl2wZz5qlNYmbrPXk/msvQ1IMSwIamUKeo63j2/iULeVhlml1BZdEEv4PRzq5W k2ixjqUjn5/vXJxzYDNCZflKmrNKddTsGnovNAPj3ctOkqDtmlCMjsIQ+AHBJ31IZx+N 0jVEGdcD9c3Cj8Tespw1iR/TPnU01lsJksPdc8OQdZW9ZCUyB8Nz1vagspo03dbjCVt/ yLKuau/RlCg2QxY7njjjrbcLTdcEfHBh03+NsbPGBi0uIpcBvtHJbJXw7IA4rfNjWBg2 YtiRWXeroU7MvOZdGp6MtqM6y4XunfhTylvxf/OCEC6skKJsbhxuDp5P38hbGJzin5L6 lzJA== MIME-Version: 1.0 X-Received: by 10.182.153.226 with SMTP id vj2mr23806316obb.26.1391297809130; Sat, 01 Feb 2014 15:36:49 -0800 (PST) Received: by 10.182.114.199 with HTTP; Sat, 1 Feb 2014 15:36:49 -0800 (PST) Date: Sun, 2 Feb 2014 00:36:49 +0100 Message-ID: Subject: 24.3.50; Font-lock rule for `ert' does not handle words with dashes (fix included) From: Anders Lindgren To: bug-gnu-emacs@gnu.org Content-Type: multipart/alternative; boundary=089e013d0dc0b0ad1a04f160c30d X-detected-operating-system: by eggs.gnu.org: Error: Malformed IPv6 address (bad octet value). X-detected-operating-system: by eggs.gnu.org: Error: Malformed IPv6 address (bad octet value). X-Received-From: 2001:4830:134:3::11 X-Spam-Score: -4.0 (----) X-Debbugs-Envelope-To: submit X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.15 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -4.0 (----) --089e013d0dc0b0ad1a04f160c30d Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable The package `ert', adds Font Lock keywords to highlight the `ert-deftest' construct. Unfortunately, the regexp used does not handle the case when the name of the test contains a dash. For example, here only "alpha" is highlighted: (ert-deftest alpha-beta () This could easily be fixed by replacing the original regexp: "(\\(\\\\s *\\(\\sw+\\)?" with (which is the construct used to highlight `defun'): "(\\(\\\\s *\\(\\(?:\\sw\\|\\s_\\)+\\)?" See `ert--activate-font-lock-keywords' in the file `ert.el'. -- Anders In GNU Emacs 24.3.50.4 (x86_64-apple-darwin13.0.0, NS apple-appkit-1265.00) of 2014-01-16 on macpro.lan Repository revision: 116039 eggert@cs.ucla.edu-20140116062406-oh0d3tsfqytj28ta Windowing system distributor `Apple', version 10.3.1265 Configured using: `configure --with-ns' Important settings: value of $LC_CTYPE: UTF-8 locale-coding-system: utf-8-unix Major mode: Font-Lock-Studio Minor modes in effect: shell-dirtrack-mode: t global-auto-revert-mode: t global-cwarn-mode: t minibuffer-electric-file-mode: t recentf-mode: t msb-mode: t display-time-mode: t tooltip-mode: t mouse-wheel-mode: t menu-bar-mode: t file-name-shadow-mode: t global-font-lock-mode: t font-lock-mode: t auto-composition-mode: t auto-encryption-mode: t auto-compression-mode: t buffer-read-only: t column-number-mode: t line-number-mode: t transient-mark-mode: t Recent input: a n SPC t h e SPC s a m e SPC t h e i n g . C-a C-x C-s C-v C-v < C-s e x p l a i n ( C-s C-s C-s C-s C-s C-a < M-f M-f M-f s SPC " e x p l a n a i n " SPC a n d SPC q M-f M-f M-f C-a C-x C-s C-v C-v C-v C-M-e C-M-e C-M-e C-M-e C-M-e C-M-e C-M-e C-M-e C-M-e M-f M-f SPC C-SPC C-M-f w C-a C-x C-s C-x C-f C-x k C-x C-f C-v x f o n t - o l o c s t M-f C-s C-w C-w C-w C-w C-w C-s C-s C-r C-r C-a C-SPC C-SPC w w x e r r e p o r t - e e m Recent messages: Mark set Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|type\\|un\\)\\|def\\= (?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\|face\\|g\\(?:ener= ic\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\\|lobal\\(?:\\(?:i= zed\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|widget\\)\\|m\\(?:acr= o\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alias\\)?\\)\\)\\_>[ \t'(]*\\(\\(?:\\sw\\|\\s_\\)... [+1] [2 times] Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|type\\|un\\)\\|def\\= (?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\|face\\|g\\(?:ener= ic\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\\|lobal\\(?:\\(?:i= zed\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|widget\\)\\|m\\(?:acr= o\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alias\\)?\\)\\)\\_>[ \t'(]*\\(\\(?:\\sw\\|\\s_\\)+\\)... [+1] Mark set Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|type\\|un\\)\\|def\\= (?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\|face\\|g\\(?:ener= ic\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\\|lobal\\(?:\\(?:i= zed\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|widget\\)\\|m\\(?:acr= o\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alias\\)?\\)\\)\\_>[ \t'(]*\\(\\(?:\\sw\\|\\s_\\)+\\)... [+1] Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|type\\|un\\)\\|def\\= (?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\|face\\|g\\(?:ener= ic\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\\|lobal\\(?:\\(?:i= zed\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|widget\\)\\|m\\(?:acr= o\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alias\\)?\\)\\)\\_>[ \t'(]*\\(\\(?:\\sw\\|\\s_\\)... [+1] Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|type\\|un\\)\\|def\\= (?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\|face\\|g\\(?:ener= ic\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\\|lobal\\(?:\\(?:i= zed\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|widget\\)\\|m\\(?:acr= o\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alias\\)?\\)\\)\\_>[ \t'(]*\\(\\(... [-1-] Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|type\\|un\\)\\|def\\= (?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\|face\\|g\\(?:ener= ic\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\\|lobal\\(?:\\(?:i= zed\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|widget\\)\\|m\\(?:acr= o\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alias\\)?\\)\\)\\_>[ \t'(]*\\(... [-1-] Library idna specified by `autoload' does not exist. Library messagexmas specified by `autoload' does not exist. Load-path shadows: /Users/anders/emacs/lisp/table hides /Volumes/HD2/build/emacs8/trunk/nextstep/Emacs.app/Contents/Resources/lisp/= textmodes/table /Users/anders/emacs/lisp/ruby-mode hides /Volumes/HD2/build/emacs8/trunk/nextstep/Emacs.app/Contents/Resources/lisp/= progmodes/ruby-mode /Users/anders/emacs/src/asm-mode-new/src/asm-mode hides /Volumes/HD2/build/emacs8/trunk/nextstep/Emacs.app/Contents/Resources/lisp/= progmodes/asm-mode Features: (shadow sort mail-extr emacsbug message rfc822 mml mml-sec mm-decode mm-bodies mm-encode mailabbrev gmm-utils mailheader sendmail superword subword image-file eieio-opt speedbar sb-image ezimage dframe face-remap mb-depth two-column grep icicles-mode icicles-face icicles-cmd2 icicles-cmd1 imenu icicles-mcmd image-dired format-spec icicles-fn icicles-var icicles-opt ffap cus-theme thingatpt filesets icicles-mac cus-edit yow shell pcomplete cookie1 bookmark compile autoload tar-mode lisp-mnt mail-utils parse-time network-stream starttls url-http tls mail-parse rfc2231 rfc2047 rfc2045 ietf-drums url-gw url-cache url-auth url url-proxy url-privacy url-expand url-methods url-history url-cookie url-domsuf url-util url-parse auth-source eieio byte-opt bytecomp byte-compile cconv eieio-core gnus-util mm-util mail-prsvr password-cache url-vars mailcap finder-inf package mule-util etags cperl-mode edebug sgml-mode rdebug-source rdebug-vars gud ruby-mode font-lock-studio-test ispell cus-start cus-load ctypes end-of-buffer-log doxygen c-electric-operator c-indent-operator cc-langs ert ewoc faceup rect vc-bzr find-func debug sh-script smie executable jka-compr info apropos dired+ dired-x dired-aux pp font-lock-studio derived dired dabbrev follow misearch multi-isearch vc-dispatcher vc-svn help-mode eldoc ps-print ps-def lpr server autorevert filenotify folding-isearch folding view rdebug cwarn prepaint cc-mode cc-fonts cc-guess cc-menus cc-cmds cc-styles cc-align cc-engine cc-vars cc-defs tempo split-nways lockdir project-name ange-ftp comint ansi-color ring paren mic-paren cl-macs gv iso-insert minibuf-elfile easy-mmode recentf tree-widget wid-edit easymenu msb edmacro kmacro disp-table warnings time advice help-fns cl cl-loaddefs cl-lib time-date tooltip electric uniquify ediff-hook vc-hooks lisp-float-type mwheel ns-win tool-bar dnd fontset image regexp-opt fringe tabulated-list newcomment lisp-mode prog-mode register page menu-bar rfn-eshadow timer select scroll-bar mouse jit-lock font-lock syntax facemenu font-core frame cham georgian utf-8-lang misc-lang vietnamese tibetan thai tai-viet lao korean japanese hebrew greek romanian slovak czech european ethiopic indian cyrillic chinese case-table epa-hook jka-cmpr-hook help simple abbrev minibuffer nadvice loaddefs button faces cus-face macroexp files text-properties overlay sha1 md5 base64 format env code-pages mule custom widget hashtable-print-readable backquote make-network-process cocoa ns multi-tty emacs) --089e013d0dc0b0ad1a04f160c30d Content-Type: text/html; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable
The package `ert', adds Font Lock keywords to hig= hlight the `ert-deftest' construct. Unfortunately, the regexp used does= not handle the case when the name of the test contains a dash.

For example, here only "alpha" is highlighted:

=A0 =A0=A0(ert-deftest alpha-beta ()

This could easily be fixed by replacing the original regexp:
=

=A0 =A0=A0"(\\(\\<ert-deftest\\)\\>\\s *\\(\\sw+\= \)?"

with (which is the construct used to hig= hlight `defun'):

=A0 =A0 "(\\(\\<ert-d= eftest\\)\\>\\s *\\(\\(?:\\sw\\|\\s_\\)+\\)?"

See `ert--activate-font-lock-keywords' in the file = `ert.el'.

=A0 =A0 -- Anders

In GNU Emacs 24.3.50.4 (x86_64-apple-darwin13.0.0, NS apple-appkit-1= 265.00)
=A0of 2014-01-16 on macpro.lan
Repository revision: 116039 e= ggert@cs.ucla.edu-20140116062406-oh0d3tsfqytj28ta
Windowing syste= m distributor `Apple', version 10.3.1265
Configured using:
=A0`configure --with-ns'

Important settin= gs:
=A0 value of $LC_CTYPE: UTF-8
=A0 locale-coding-sys= tem: utf-8-unix

Major mode: Font-Lock-Studio
=

Minor modes in effect:
=A0 shell-dirtrack-mode: t<= /div>
=A0 global-auto-revert-mode: t
=A0 global-cwarn-mode: t=
=A0 minibuffer-electric-file-mode: t
=A0 recentf-mode:= t
=A0 msb-mode: t
=A0 display-time-mode: t
=A0 toolt= ip-mode: t
=A0 mouse-wheel-mode: t
=A0 menu-bar-mode: t=
=A0 file-name-shadow-mode: t
=A0 global-font-lock-mode= : t
=A0 font-lock-mode: t
=A0 auto-composition-mode: t
=A0 = auto-encryption-mode: t
=A0 auto-compression-mode: t
= =A0 buffer-read-only: t
=A0 column-number-mode: t
=A0 l= ine-number-mode: t
=A0 transient-mark-mode: t

Recent input:
a n SPC t h e SPC s a m e SPC t h e <backspace> i n=A0
g . C-a C-x C-s C-v C-v <escape> < C-s e x p l a i=A0
= n ( <backspace> C-s C-s C-s C-s C-s C-a <escape> <=A0
<down> <down> <down> <down> <down> <d= own> <down> <down>=A0
<down> <down> &l= t;down> <down> <down> <down> <down> <down>= =A0
<down> <down> <down> <down> <down> <d= own> <down> <down>=A0
<down> <down> &l= t;down> <down> <down> <down> <down> <down>= =A0
<down> <down> <down> <down> <down> <d= own> M-f M-f M-f=A0
s SPC " e x p l a n <backspace>= <backspace> a i n "=A0
SPC a n d SPC <escape> q= M-f M-f M-f <left> <left>=A0
<left> <left> <left> <backspace> C-a C-x C-s C= -v C-v=A0
C-v C-M-e C-M-e C-M-e C-M-e C-M-e C-M-e C-M-e C-M-e=A0<= /div>
C-M-e <down> <down> M-f M-f <right> SPC <bac= kspace>=A0
C-SPC C-M-f <escape> w C-a C-x C-s C-x C-f <down> <retu= rn>=A0
C-x k <return> C-x C-f <up> <return> = C-v <escape> x=A0
f o n t - o <backspace> l o c <t= ab> s t <tab> <return>=A0
<down> <down> M-f <right> C-s C-w C-w C-w C-w C-w C-= s=A0
C-s C-r C-r C-a <up> <up> <down> <down&= gt; <down> <down>=A0
<down> <down> <do= wn> <down> <down> <down> <down> <down>=A0<= /div>
<down> <down> <down> <down> <down> <d= own> <down> <left>=A0
<left> <left> &l= t;left> <left> <left> <left> <left> <left>= =A0
<left> <left> <left> <left> <left> <l= eft> <left> <left>=A0
<left> <left> &l= t;left> <left> <left> <left> <left> <left>= =A0
<left> C-SPC <right> <right> <right> <right= > <left>=A0
<left> <left> <left> <l= eft> <left> <left> C-SPC <right>=A0
<righ= t> <right> <right> <right> <right> <right>= <right>=A0
<right> <right> <right> <right> <right> = <right> <right>=A0
<right> <right> <ri= ght> <right> <right> <right> <right>=A0
<right> <right> <right> <right> <escape> w &l= t;right>=A0
<escape> w <escape> x e r <backspac= e> <backspace> r=A0
e p o r t - e <backspace> e m = <tab> <return>

Recent messages:
Mark set
Matches &= quot;(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|type\\|un\\)\\|d= ef\\(?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\|face\\|g\\(?:= eneric\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\\|lobal\\(?:\\= (?:ized\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|widget\\)\\|m\\(?= :acro\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alias\\)?\\)\\)\\_= >[ \t'(]*\\(\\(?:\\sw\\|\\s_\\)... [+1] [2 times]
Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|ty= pe\\|un\\)\\|def\\(?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\= |face\\|g\\(?:eneric\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\= \|lobal\\(?:\\(?:ized\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|wid= get\\)\\|m\\(?:acro\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alia= s\\)?\\)\\)\\_>[ \t'(]*\\(\\(?:\\sw\\|\\s_\\)+\\)... [+1]
Mark set
Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:tru= c\\|ubs\\)t\\)\\|type\\|un\\)\\|def\\(?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\= \|onst\\|ustom\\)\\|face\\|g\\(?:eneric\\|roup\\)\\|ine-\\(?:derived-mode\\= |g\\(?:\\(?:eneric\\|lobal\\(?:\\(?:ized\\)?-minor\\)\\)-mode\\)\\|minor-mo= de\\|skeleton\\|widget\\)\\|m\\(?:acro\\|ethod\\)\\|subst\\|theme\\|un\\|va= r\\(?:-local\\|alias\\)?\\)\\)\\_>[ \t'(]*\\(\\(?:\\sw\\|\\s_\\)+\\)= ... [+1]
Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|ty= pe\\|un\\)\\|def\\(?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\= |face\\|g\\(?:eneric\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\= \|lobal\\(?:\\(?:ized\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|wid= get\\)\\|m\\(?:acro\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alia= s\\)?\\)\\)\\_>[ \t'(]*\\(\\(?:\\sw\\|\\s_\\)... [+1]
Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|ty= pe\\|un\\)\\|def\\(?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\= |face\\|g\\(?:eneric\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\= \|lobal\\(?:\\(?:ized\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|wid= get\\)\\|m\\(?:acro\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alia= s\\)?\\)\\)\\_>[ \t'(]*\\(\\(... [-1-]
Matches "(\\(cl-def\\(?:macro\\|s\\(?:\\(?:truc\\|ubs\\)t\\)\\|ty= pe\\|un\\)\\|def\\(?:a\\(?:dvice\\|lias\\)\\|c\\(?:lass\\|onst\\|ustom\\)\\= |face\\|g\\(?:eneric\\|roup\\)\\|ine-\\(?:derived-mode\\|g\\(?:\\(?:eneric\= \|lobal\\(?:\\(?:ized\\)?-minor\\)\\)-mode\\)\\|minor-mode\\|skeleton\\|wid= get\\)\\|m\\(?:acro\\|ethod\\)\\|subst\\|theme\\|un\\|var\\(?:-local\\|alia= s\\)?\\)\\)\\_>[ \t'(]*\\(... [-1-]
Library idna specified by `autoload' does not exist.
Lib= rary messagexmas specified by `autoload' does not exist.

=
Load-path shadows:
/Users/anders/emacs/lisp/table hide= s /Volumes/HD2/build/emacs8/trunk/nextstep/Emacs.app/Contents/Resources/lis= p/textmodes/table
/Users/anders/emacs/lisp/ruby-mode hides /Volumes/HD2/build/emacs8/tru= nk/nextstep/Emacs.app/Contents/Resources/lisp/progmodes/ruby-mode
/Users/anders/emacs/src/asm-mode-new/src/asm-mode hides /Volumes/HD2/build= /emacs8/trunk/nextstep/Emacs.app/Contents/Resources/lisp/progmodes/asm-mode=

Features:
(shadow sort mail-extr emacsbug mes= sage rfc822 mml mml-sec mm-decode
mm-bodies mm-encode mailabbrev = gmm-utils mailheader sendmail superword
subword image-file eieio-= opt speedbar sb-image ezimage dframe face-remap
mb-depth two-column grep icicles-mode icicles-face icicles-cmd2
<= div>icicles-cmd1 imenu icicles-mcmd image-dired format-spec icicles-fn
icicles-var icicles-opt ffap cus-theme thingatpt filesets icicles-mac=
cus-edit yow shell pcomplete cookie1 bookmark compile autoload tar-mod= e
lisp-mnt mail-utils parse-time network-stream starttls url-http= tls
mail-parse rfc2231 rfc2047 rfc2045 ietf-drums url-gw url-cac= he url-auth
url url-proxy url-privacy url-expand url-methods url-history url-cooki= e
url-domsuf url-util url-parse auth-source eieio byte-opt byteco= mp
byte-compile cconv eieio-core gnus-util mm-util mail-prsvr
password-cache url-vars mailcap finder-inf package mule-util etags
cperl-mode edebug sgml-mode rdebug-source rdebug-vars gud ruby-mode<= /div>
font-lock-studio-test ispell cus-start cus-load ctypes end-of-buf= fer-log
doxygen c-electric-operator c-indent-operator cc-langs ert ewoc faceup=
rect vc-bzr find-func debug sh-script smie executable jka-compr = info
apropos dired+ dired-x dired-aux pp font-lock-studio derived= dired
dabbrev follow misearch multi-isearch vc-dispatcher vc-svn help-mode
eldoc ps-print ps-def lpr server autorevert filenotify folding-ise= arch
folding view rdebug cwarn prepaint cc-mode cc-fonts cc-guess= cc-menus
cc-cmds cc-styles cc-align cc-engine cc-vars cc-defs tempo split-nways=
lockdir project-name ange-ftp comint ansi-color ring paren mic-p= aren
cl-macs gv iso-insert minibuf-elfile easy-mmode recentf tree= -widget
wid-edit easymenu msb edmacro kmacro disp-table warnings time advice
help-fns cl cl-loaddefs cl-lib time-date tooltip electric uniquify=
ediff-hook vc-hooks lisp-float-type mwheel ns-win tool-bar dnd f= ontset
image regexp-opt fringe tabulated-list newcomment lisp-mode prog-mode<= /div>
register page menu-bar rfn-eshadow timer select scroll-bar mouse<= /div>
jit-lock font-lock syntax facemenu font-core frame cham georgian<= /div>
utf-8-lang misc-lang vietnamese tibetan thai tai-viet lao korean
=
japanese hebrew greek romanian slovak czech european ethiopic indian
cyrillic chinese case-table epa-hook jka-cmpr-hook help simple abb= rev
minibuffer nadvice loaddefs button faces cus-face macroexp files
=
text-properties overlay sha1 md5 base64 format env code-pages mule
custom widget hashtable-print-readable backquote make-network-proces= s
cocoa ns multi-tty emacs)

--089e013d0dc0b0ad1a04f160c30d-- ------------=_1391535543-3549-1-- From unknown Sun Jun 22 11:38:45 2025 MIME-Version: 1.0 X-Mailer: MIME-tools 5.503 (Entity 5.503) X-Loop: help-debbugs@gnu.org From: help-debbugs@gnu.org (GNU bug Tracking System) To: Nicolas Richard Subject: bug#16480: closed (Re: bug#16620: 24.3.50; Font-lock rule for `ert' does not handle words with dashes (fix included)) Message-ID: References: <87ha93ndua.fsf@yahoo.fr> X-Gnu-PR-Message: they-closed 16480 X-Gnu-PR-Package: emacs X-Gnu-PR-Keywords: confirmed Reply-To: 16480@debbugs.gnu.org Date: Tue, 04 Feb 2014 17:39:04 +0000 Content-Type: multipart/mixed; boundary="----------=_1391535544-3549-3" This is a multi-part message in MIME format... ------------=_1391535544-3549-3 Content-Disposition: inline Content-Transfer-Encoding: quoted-printable Content-Type: text/plain; charset="utf-8" Your bug report #16620: 24.3.50; fontification in the definition of ert tests names does no= t highlight full symbol which was filed against the emacs package, has been closed. The explanation is attached below, along with your original report. If you require more details, please reply to 16480@debbugs.gnu.org. --=20 16620: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=3D16620 GNU Bug Tracking System Contact help-debbugs@gnu.org with problems ------------=_1391535544-3549-3 Content-Type: message/rfc822 Content-Disposition: inline Content-Transfer-Encoding: 7bit Received: (at 16620-done) by debbugs.gnu.org; 4 Feb 2014 17:38:04 +0000 Received: from localhost ([127.0.0.1]:49677 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1WAjwh-0000u0-P6 for submit@debbugs.gnu.org; Tue, 04 Feb 2014 12:38:04 -0500 Received: from mercure.iro.umontreal.ca ([132.204.24.67]:60326) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1WAjwf-0000tb-OJ for 16620-done@debbugs.gnu.org; Tue, 04 Feb 2014 12:38:02 -0500 Received: from hidalgo.iro.umontreal.ca (hidalgo.iro.umontreal.ca [132.204.27.50]) by mercure.iro.umontreal.ca (Postfix) with ESMTP id 1105C84E50; Tue, 4 Feb 2014 12:38:01 -0500 (EST) Received: from lechon.iro.umontreal.ca (lechon.iro.umontreal.ca [132.204.27.242]) by hidalgo.iro.umontreal.ca (Postfix) with ESMTP id 3CA4B1E5913; Tue, 4 Feb 2014 12:37:37 -0500 (EST) Received: by lechon.iro.umontreal.ca (Postfix, from userid 20848) id 213D2B40FE; Tue, 4 Feb 2014 12:37:37 -0500 (EST) From: Stefan Monnier To: Anders Lindgren Subject: Re: bug#16620: 24.3.50; Font-lock rule for `ert' does not handle words with dashes (fix included) Message-ID: References: Date: Tue, 04 Feb 2014 12:37:37 -0500 In-Reply-To: (Anders Lindgren's message of "Sun, 2 Feb 2014 00:36:49 +0100") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.3.50 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain X-DIRO-MailScanner-Information: Please contact the ISP for more information X-DIRO-MailScanner: Found to be clean X-DIRO-MailScanner-SpamCheck: n'est pas un polluriel, SpamAssassin (score=-2.82, requis 5, autolearn=not spam, ALL_TRUSTED -2.82, MC_TSTLAST 0.00) X-DIRO-MailScanner-From: monnier@iro.umontreal.ca X-Spam-Status: No X-Spam-Score: -2.9 (--) X-Debbugs-Envelope-To: 16620-done Cc: 16620-done@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.15 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -2.9 (--) > The package `ert', adds Font Lock keywords to highlight the `ert-deftest' > construct. Unfortunately, the regexp used does not handle the case when the > name of the test contains a dash. Thanks, installed, Stefan ------------=_1391535544-3549-3 Content-Type: message/rfc822 Content-Disposition: inline Content-Transfer-Encoding: 7bit Received: (at submit) by debbugs.gnu.org; 17 Jan 2014 09:43:38 +0000 Received: from localhost ([127.0.0.1]:54437 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1W45xh-00050c-PA for submit@debbugs.gnu.org; Fri, 17 Jan 2014 04:43:37 -0500 Received: from eggs.gnu.org ([208.118.235.92]:52482) by debbugs.gnu.org with esmtp (Exim 4.80) (envelope-from ) id 1W45xf-00050V-S4 for submit@debbugs.gnu.org; Fri, 17 Jan 2014 04:43:36 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1W45xW-0003aa-AM for submit@debbugs.gnu.org; Fri, 17 Jan 2014 04:43:35 -0500 X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org X-Spam-Level: X-Spam-Status: No, score=0.0 required=5.0 tests=BAYES_20,FREEMAIL_FROM autolearn=disabled version=3.3.2 Received: from lists.gnu.org ([2001:4830:134:3::11]:36757) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1W45xW-0003aW-7L for submit@debbugs.gnu.org; Fri, 17 Jan 2014 04:43:26 -0500 Received: from eggs.gnu.org ([2001:4830:134:3::10]:54069) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1W45xO-0007or-OX for bug-gnu-emacs@gnu.org; Fri, 17 Jan 2014 04:43:26 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1W45xH-0003VJ-2r for bug-gnu-emacs@gnu.org; Fri, 17 Jan 2014 04:43:18 -0500 Received: from mxin.ulb.ac.be ([164.15.128.112]:8267) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1W45xG-0003UJ-TL for bug-gnu-emacs@gnu.org; Fri, 17 Jan 2014 04:43:11 -0500 X-IronPort-Anti-Spam-Filtered: true X-IronPort-Anti-Spam-Result: AlIIAJFf2FKkD4Nx/2dsb2JhbABZqjCCQQGPMIQtdIM9JDQBiE8BFJoTj2SVHAGGRId0hyiEIgSYIYYvi2iBb4E/Ow Received: from geodiff-mac3.ulb.ac.be (HELO geodiff-mac3) ([164.15.131.113]) by smtp.ulb.ac.be with ESMTP; 17 Jan 2014 10:43:08 +0100 From: Nicolas Richard To: bug-gnu-emacs@gnu.org Subject: 24.3.50; fontification in the definition of ert tests names does not highlight full symbol Date: Fri, 17 Jan 2014 10:43:09 +0100 Message-ID: <87ha93ndua.fsf@yahoo.fr> MIME-Version: 1.0 Content-Type: text/plain X-detected-operating-system: by eggs.gnu.org: Genre and OS details not recognized. X-detected-operating-system: by eggs.gnu.org: Error: Malformed IPv6 address (bad octet value). X-Received-From: 2001:4830:134:3::11 X-Spam-Score: -5.0 (-----) X-Debbugs-Envelope-To: submit X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.15 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -5.0 (-----) Hello, Running: emacs -Q -l ert testfile.el with the following content of testfile.el: (ert-deftest latex-movement ...) (defun latex-movement ...) will highlight only 'latex' in the first line, instead of the whole symbol 'latex-movement'. Second line is just there to check that it works for defun. Here's a fix: diff --git a/lisp/emacs-lisp/ert.el b/lisp/emacs-lisp/ert.el index 4b11860..ee058a8 100644 --- a/lisp/emacs-lisp/ert.el +++ b/lisp/emacs-lisp/ert.el @@ -1469,7 +1469,7 @@ the tests)." "Activate font-lock keywords for some of ERT's symbols." (font-lock-add-keywords nil - '(("(\\(\\\\s *\\(\\sw+\\)?" + '(("(\\(\\\\s *\\(\\(?:\\sw\\|\\s_\\)+\\)?" (1 font-lock-keyword-face nil t) (2 font-lock-function-name-face nil t))))) -- Nico. ------------=_1391535544-3549-3--