[perl #56948] [BUG] .parrot_current_rev broken

2008-07-21 Thread James Keenan via RT
Patch applied in r29660 tonight.

[perl #56948] [BUG] .parrot_current_rev broken

2008-07-18 Thread James Keenan via RT
On Fri Jul 18 09:17:19 2008, [EMAIL PROTECTED] wrote: > > I would find this clearer if you reversed the top level conditions. In > English, this reads: > > if the revision isn't defined, then do this > otherwise do that > > Flipping the order changes it to: > > if the revisi

Re: [perl #56948] [BUG] .parrot_current_rev broken

2008-07-18 Thread chromatic
On Thursday 17 July 2008 19:15:52 James Keenan via RT wrote: > +    if (! defined $args->{revision}) { > +        $args->{revision} = 'unknown'; > +        _print_to_cache($args->{cache}, $args->{revision}); > +        return $args->{revision}; > +    } else { > +        if (defined ($args->{prev}

[perl #56948] [BUG] .parrot_current_rev broken

2008-07-17 Thread James Keenan via RT
Here's the attachment. Index: lib/Parrot/Revision.pm === --- lib/Parrot/Revision.pm (.../trunk) (revision 29567) +++ lib/Parrot/Revision.pm (.../branches/revisionpm) (revision 29574) @@ -30,36 +30,50 @@ sub update

[perl #56948] [BUG] .parrot_current_rev broken

2008-07-17 Thread James Keenan via RT
On Wed Jul 16 06:27:16 2008, julianalbo wrote: > On Wed, Jul 16, 2008 at 1:12 PM, James Keenan via RT [snip] > > > If no one gets to this today I will try to work on this this evening. > > Go for it. > On Wed Jul 16 04:12:35 2008, [EMAIL PROTECTED] wrote: > [snip] > The control flow here is so

Re: [perl #56948] [BUG] .parrot_current_rev broken

2008-07-16 Thread ajr
> > The desired behavior is creating the file if not present or his number > is outdated, not touching it if the number is already correct. > At 29516, that seems to be what it's doing -- Email and shopping with the feelgood factor! 55% of income to good causes. http://www.ippimail.com

Re: [perl #56948] [BUG] .parrot_current_rev broken

2008-07-16 Thread NotFound
On Wed, Jul 16, 2008 at 1:12 PM, James Keenan via RT <[EMAIL PROTECTED]> wrote: > I think this new subroutine could use some refactoring: Yes, my goal was to fix the problem as fast as possible, and I'm not very fluent with perl. > If no one gets to this today I will try to work on this this even

Re: [perl #56948] [BUG] .parrot_current_rev broken

2008-07-16 Thread NotFound
On Wed, Jul 16, 2008 at 12:45 AM, <[EMAIL PROTECTED]> wrote: > I just ran a test on XP-Home (using Strawberry Perl) after updating to > r29495. Configure.pl creates the file (whether or not it was present), but > the value appears to be a constant 0. (Make test and perl6 have no > effect.) Pleas

Re: [perl #56948] [BUG] .parrot_current_rev broken

2008-07-16 Thread ajr
> I fixed the problem in r29488, but I don't have any windows > environment available to test. > I just ran a test on XP-Home (using Strawberry Perl) after updating to r29495. Configure.pl creates the file (whether or not it was present), but the value appears to be a constant 0. (Make test and pe

Re: [perl #56948] [BUG] .parrot_current_rev broken

2008-07-16 Thread Tim Heckman
Confirmed fixed on windows in r29509. -- tjh On Jul 16, 2008, at 5:02 AM, NotFound wrote: On Wed, Jul 16, 2008 at 6:08 AM, Tim Heckman <[EMAIL PROTECTED]> wrote: Starting in r29489, .parrot_current_rev contains "0" instead of the revision number. I was using a simplified way to call svn

[perl #56948] [BUG] .parrot_current_rev broken

2008-07-16 Thread James Keenan via RT
I think this new subroutine could use some refactoring: 30 sub update { 31 my $prev = _get_revision(); 32 my $revision = _analyze_sandbox(); 33 if (defined ($prev) && ($revision ne $prev)) { 34 $revision = 'unknown' unless defined $revision; 35

Re: [perl #56948] [BUG] .parrot_current_rev broken

2008-07-16 Thread NotFound
On Wed, Jul 16, 2008 at 6:08 AM, Tim Heckman <[EMAIL PROTECTED]> wrote: > Starting in r29489, .parrot_current_rev contains "0" instead of the revision > number. I was using a simplified way to call svn info avoiding locale dependencies, and forgot to replace with a more generic way. Fixed in r295

Re: [perl #56948] [BUG] .parrot_current_rev broken

2008-07-15 Thread NotFound
On Wed, Jul 16, 2008 at 1:32 AM, James Keenan via RT <[EMAIL PROTECTED]> wrote: >> Worse, the logic the set the current revision for svn updates is >> wrong. > No, the logic was correct. As particle said on #parrot yesterday, > ".parrot_current_rev should always reflect the last time you ran 'per

Re: [perl #56948] [BUG] .parrot_current_rev broken

2008-07-15 Thread Tim Heckman
Starting in r29489, .parrot_current_rev contains "0" instead of the revision number. -- tjh On Jul 15, 2008, at 11:23 PM, Tim Heckman wrote: Seems to be broken as of r29503. nmake realclean (.parrot_current_rev is deleted) svn update perl Configure.pl .parrot_current_rev contains "0"

Re: [perl #56948] [BUG] .parrot_current_rev broken

2008-07-15 Thread Tim Heckman
For r29488, what I observe (on Windows) is that * Configure.pl generates .parrot_current_rev with the correct revision number (but this is broken in r29503 -- see my earlier message) * Configure.pl does update .parrot_current_rev when the file already exists, provided the revision numb

Re: [perl #56948] [BUG] .parrot_current_rev broken

2008-07-15 Thread Tim Heckman
Seems to be broken as of r29503. nmake realclean (.parrot_current_rev is deleted) svn update perl Configure.pl .parrot_current_rev contains "0" Also, if I run Configure.pl again, the timestamp on the file does not change. -- tjh On Jul 15, 2008, at 1:26 PM, NotFound wrote: I fixed th

[perl #56948] [BUG] .parrot_current_rev broken

2008-07-15 Thread James Keenan via RT
> > -- Forwarded message -- > From: Reini Urban <[EMAIL PROTECTED]> > Date: Tue, Jul 15, 2008 at 9:52 AM > Subject: .parrot_current_rev > To: [EMAIL PROTECTED] > > > The file .parrot_current_rev is missing in the Release, and also the > revision is nowhere > mentioned in any Rel

Re: [perl #56948] [BUG] .parrot_current_rev broken

2008-07-15 Thread NotFound
I fixed the problem in r29488, but I don't have any windows environment available to test. -- Salu2

Re: [perl #56948] [BUG] .parrot_current_rev broken

2008-07-15 Thread Tim Heckman
It may also be relevant that on the Windows box where I run the smoke tests, my ".svn" directories are actually "_svn". http://svn.collab.net/repos/svn/trunk/notes/asp-dot-net-hack.txt --- tjh > On Tue, Jul 15, 2008 at 3:58 PM, via RT Will Coleda > <[EMAIL PROTECTED]> wrote: >> -- For

Re: [perl #56948] [BUG] .parrot_current_rev broken

2008-07-15 Thread NotFound
On Tue, Jul 15, 2008 at 3:58 PM, via RT Will Coleda <[EMAIL PROTECTED]> wrote: > -- Forwarded message -- > From: Reini Urban <[EMAIL PROTECTED]> > Date: Tue, Jul 15, 2008 at 9:52 AM > Subject: .parrot_current_rev > To: [EMAIL PROTECTED] > Worse, the logic the set the current revisi

[perl #56948]

2008-07-15 Thread Will Coleda
Forwarding Jerry's followup to the ticket. -- Forwarded message -- From: jerry gay <[EMAIL PROTECTED]> Date: Tue, Jul 15, 2008 at 10:14 AM Subject: Re: .parrot_current_rev To: Reini Urban <[EMAIL PROTECTED]> Cc: [EMAIL PROTECTED] On Tue, Jul 15, 2008 at 6:52 AM, Reini Urban <[EM

[perl #56948] [BUG] .parrot_current_rev broken

2008-07-15 Thread via RT
# New Ticket Created by Will Coleda # Please include the string: [perl #56948] # in the subject line of all future correspondence about this issue. # http://rt.perl.org/rt3/Ticket/Display.html?id=56948 > Forward to RT so a ticket is opened. -- Forwarded message -- F