Send commitlog mailing list submissions to
        commitlog@lists.openmoko.org

To subscribe or unsubscribe via the World Wide Web, visit
        http://lists.openmoko.org/mailman/listinfo/commitlog
or, via email, send a message with subject or body 'help' to
        commitlog-requ...@lists.openmoko.org

You can reach the person managing the list at
        commitlog-ow...@lists.openmoko.org

When replying, please edit your Subject line so it is more specific
than "Re: Contents of commitlog digest..."
Today's Topics:

   1. r5820 - trunk/gta02-core/bom (wer...@docs.openmoko.org)
--- Begin Message ---
Author: werner
Date: 2010-02-06 07:20:11 +0100 (Sat, 06 Feb 2010)
New Revision: 5820

Modified:
   trunk/gta02-core/bom/prettyord
Log:
Oops. Forgot some cleanup. No surprise the output looked scary.

- bom/prettyord: forgot to remove debugging output 
- bom/prettyord: complained about missing descriptions even if we found one 



Modified: trunk/gta02-core/bom/prettyord
===================================================================
--- trunk/gta02-core/bom/prettyord      2010-02-06 06:09:13 UTC (rev 5819)
+++ trunk/gta02-core/bom/prettyord      2010-02-06 06:20:11 UTC (rev 5820)
@@ -17,15 +17,14 @@
     push(@{ $out[1] }, $order{$_}[0]);
     @f = split(/\s+/, $_);
     push(@{ $out[2] }, $f[1]);
-    print STDERR "$_: no description\n" unless defined $dsc{$_};
     my $dsc = $dsc{$_};
     if (!defined $dsc) {
-print STDERR "$_ -> ", join(" ", &eq($_)), "\n";
        for (&eq($_)) {
            $dsc = $dsc{$_};
            last if defined $dsc;
        }
     }
+    print STDERR "$_: no description\n" unless defined $dsc;
     push(@{ $out[3] }, defined $dsc ? $dsc : "???");
     push(@{ $out[4] }, $order{$_}[1]);
     push(@{ $out[5] }, sprintf("%.2f", $order{$_}[2]));




--- End Message ---
_______________________________________________
commitlog mailing list
commitlog@lists.openmoko.org
http://lists.openmoko.org/mailman/listinfo/commitlog

Reply via email to