Skip Menu |
 

This queue is for tickets about the Devel-PerlySense CPAN distribution.

Report information
The Basics
Id: 67853
Status: new
Priority: 0/
Queue: Devel-PerlySense

People
Owner: Nobody in particular
Requestors: user42 [...] zip.com.au
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



From gg [...] zip.com.au Fri Apr 29 19: 54:31 2011
MIME-Version: 1.0
X-Spam-Status: No, score=-6.898 tagged_above=-99.9 required=10 tests=[AWL=0.002, BAYES_00=-1.9, RCVD_IN_DNSWL_HI=-5] autolearn=ham
X-Spam-Flag: NO
content-type: text/plain; charset="utf-8"
Message-ID: <8762pwy5pa.fsf [...] blah.blah>
X-Virus-Scanned: Debian amavisd-new at bestpractical.com
X-Spam-Score: -6.898
Received: from localhost (localhost [127.0.0.1]) by hipster.bestpractical.com (Postfix) with ESMTP id 06E952418C5 for <cpan-bug+Devel-PerlySense [...] hipster.bestpractical.com>; Fri, 29 Apr 2011 19:54:31 -0400 (EDT)
Received: from hipster.bestpractical.com ([127.0.0.1]) by localhost (hipster.bestpractical.com [127.0.0.1]) (amavisd-new, port 10024) with ESMTP id c5cmOXUwzYTZ for <cpan-bug+Devel-PerlySense [...] hipster.bestpractical.com>; Fri, 29 Apr 2011 19:54:28 -0400 (EDT)
Received: from la.mx.develooper.com (x1.develooper.com [207.171.7.70]) by hipster.bestpractical.com (Postfix) with SMTP id 75DDE24162C for <bug-Devel-PerlySense [...] rt.cpan.org>; Fri, 29 Apr 2011 19:54:27 -0400 (EDT)
Received: (qmail 32281 invoked by uid 103); 29 Apr 2011 23:54:27 -0000
Received: from x16.dev (10.0.100.26) by x1.dev with QMQP; 29 Apr 2011 23:54:27 -0000
Received: from mailout2-2.pacific.net.au (HELO mailout2.pacific.net.au) (61.8.2.225) by 16.mx.develooper.com (qpsmtpd/0.80/v0.80-19-gf52d165) with ESMTP; Fri, 29 Apr 2011 16:54:24 -0700
Received: from mailproxy1.pacific.net.au (mailproxy1.pacific.net.au [61.8.2.162]) by mailout2.pacific.net.au (Postfix) with ESMTP id ABDA02B8456 for <bug-Devel-PerlySense [...] rt.cpan.org>; Sat, 30 Apr 2011 09:54:20 +1000 (EST)
Received: from blah.blah (unknown [203.26.175.200]) by mailproxy1.pacific.net.au (Postfix) with ESMTP id 3CDEC8C0A for <bug-Devel-PerlySense [...] rt.cpan.org>; Sat, 30 Apr 2011 09:54:20 +1000 (EST)
Received: from gg by blah.blah with local (Exim 4.72) (envelope-from <gg [...] zip.com.au>) id 1QFxVh-0005WD-2T for bug-Devel-PerlySense [...] rt.cpan.org; Sat, 30 Apr 2011 09:54:09 +1000
Delivered-To: cpan-bug+Devel-PerlySense [...] hipster.bestpractical.com
User-Agent: Gnus/5.110011 (No Gnus v0.11) Emacs/23.2 (gnu/linux)
Subject: ps/expected-test-count and Test.pm
Return-Path: <gg [...] zip.com.au>
X-RT-Mail-Extension: devel-perlysense
X-Original-To: cpan-bug+Devel-PerlySense [...] hipster.bestpractical.com
X-Spam-Check-BY: 16.mx.develooper.com
Date: Sat, 30 Apr 2011 09:54:09 +1000
X-Spam-Level:
To: bug-Devel-PerlySense [...] rt.cpan.org
From: Kevin Ryde <user42 [...] zip.com.au>
X-RT-Original-Encoding: us-ascii
Content-Length: 518
Download (untitled) / with headers
text/plain 518b
When running a Test.pm test script outside of the test harness there's no summary for ps/expected-test-count to pick up. It might as the last thing it tries, look for the last ok or not ok for how many tests were actually run, ;; in a raw run of a Test.pm (without the test harness) there's ;; no count summary, look for the last "ok" or "not ok" (goto-char (point-max)) (if (re-search-backward "^\\(not \\)?ok \\([0-9]+\\)$" nil t) (throw 'count-string (string-to-number (match-string 2))))


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.