[CVS] OpenPKG: openpkg-registry/ registry-ui.pl

Thu, 13 Jul 2006 00:41:41 -0700 

  OpenPKG CVS Repository
  http://cvs.openpkg.org/
  ____________________________________________________________________________

  Server: cvs.openpkg.org                  Name:   Thomas Lotterer
  Root:   /v/openpkg/cvs                   Email:  [EMAIL PROTECTED]
  Module: openpkg-registry                 Date:   13-Jul-2006 09:41:49
  Branch: HEAD                             Handle: 2006071308414900

  Modified files:
    openpkg-registry        registry-ui.pl

  Log:
    cosmetics

  Summary:
    Revision    Changes     Path
    1.75        +11 -11     openpkg-registry/registry-ui.pl
  ____________________________________________________________________________

  patch -p0 <<'@@ .'
  Index: openpkg-registry/registry-ui.pl
  ============================================================================
  $ cvs diff -u -r1.74 -r1.75 registry-ui.pl
  --- openpkg-registry/registry-ui.pl   13 Jul 2006 07:39:15 -0000      1.74
  +++ openpkg-registry/registry-ui.pl   13 Jul 2006 07:41:49 -0000      1.75
  @@ -1330,11 +1330,11 @@
                       if (not defined $rv) {
                           $msg = $dbh->errstr;
                           $msg =~ s/[ ]*ERROR:?[ ]*//;
  -                        $html .= sprintf("<br/><img 
src=\"?page=gif;name=icon-x\">&nbsp;<code><b>%s</b></code> ERROR DataBase 
reports %s\n", $k, $msg);
  +                        $html .= sprintf("<br/><img 
src=\"?page=gif;name=icon-x\">&nbsp;<code><b>%s</b></code>&nbsp;ERROR: DataBase 
reports %s\n", $k, $msg);
                           next;
                       }
                       if ($rv != 1) {
  -                        $html .= sprintf("<br/><img 
src=\"?page=gif;name=icon-x\">&nbsp;<code><b>%s</b></code> ERROR update failed 
rv=$rv\n", $k);
  +                        $html .= sprintf("<br/><img 
src=\"?page=gif;name=icon-x\">&nbsp;<code><b>%s</b></code>&nbsp;ERROR: update 
failed rv=$rv\n", $k);
                           next;
                       }
                       $html .= sprintf("<br/><img 
src=\"?page=gif;name=icon-ok\">&nbsp<code><b>%s</b></code> %s\n", $k, 
$formstruct->{$mode}->{$k}->{registry_desc});
  @@ -1358,11 +1358,11 @@
                       if (not defined $rv) {
                           $msg = $dbh->errstr;
                           $msg =~ s/[ ]*ERROR:?[ ]*//;
  -                        $html .= sprintf("<br/><img 
src=\"?page=gif;name=icon-x\">&nbsp;<code><b>%s</b></code> ERROR DataBase 
reports %s\n", $k, $msg);
  +                        $html .= sprintf("<br/><img 
src=\"?page=gif;name=icon-x\">&nbsp;<code><b>%s</b></code>&nbsp;ERROR: DataBase 
reports %s\n", $k, $msg);
                           next;
                       }
                       if ($rv != 1) {
  -                        $html .= sprintf("<br/><img 
src=\"?page=gif;name=icon-x\">&nbsp;<code><b>%s</b></code> ERROR deletion 
failed rv=$rv\n", $k);
  +                        $html .= sprintf("<br/><img 
src=\"?page=gif;name=icon-x\">&nbsp;<code><b>%s</b></code>&nbsp;ERROR: deletion 
failed rv=$rv\n", $k);
                           next;
                       }
                       $html .= sprintf("<br/><img 
src=\"?page=gif;name=icon-ok\">&nbsp<code><b>%s</b></code> %s\n", $k, 
$formstruct->{$mode}->{$k}->{registry_desc});
  @@ -1615,12 +1615,12 @@
           if (not defined $rv) {
               $msg = $dbh->errstr;
               $msg =~ s/[ ]*ERROR:?[ ]*//;
  -            $res->{$k} = sprintf("ERROR DataBase reports %s", $msg);
  +            $res->{$k} = sprintf("ERROR: DataBase reports %s", $msg);
               $commit = 0;
               next;
           }
           elsif ($rv < 1) {
  -            $res->{$k} = sprintf("ERROR username \"%s\" not found", 
CGI::escapeHTML($username));
  +            $res->{$k} = sprintf("ERROR: username \"%s\" not found", 
CGI::escapeHTML($username));
               $commit = 0;
               next;
           }
  @@ -1651,7 +1651,7 @@
           if (not defined $rv) {
               $msg = $dbh->errstr;
               $msg =~ s/[ ]*ERROR:?[ ]*//;
  -            $res->{$k} = sprintf("ERROR DataBase reports %s", $msg);
  +            $res->{$k} = sprintf("ERROR: DataBase reports %s", $msg);
               $commit = 0;
               next;
           }
  @@ -1676,13 +1676,13 @@
               if (not defined $rv) {
                   $msg = $dbh->errstr;
                   $msg =~ s/[ ]*ERROR:?[ ]*//;
  -                $res->{$k} = sprintf("ERROR DataBase reports %s", $msg);
  +                $res->{$k} = sprintf("ERROR: DataBase reports %s", $msg);
                   $commit = 0;
                   next;
               }
           }
           if ($rv < 1) {
  -            $res->{$k} = sprintf("ERROR update and insert failed");
  +            $res->{$k} = sprintf("ERROR: update and insert failed");
               $commit = 0;
               next;
           }
  @@ -1700,7 +1700,7 @@
                   $html .= "</registry>\n";
               }
               else {
  -                $html .= sprintf("<br/><img 
src=\"?page=gif;name=icon-x\">&nbsp;ERROR commit transaction failed, DataBase 
reports %s\n", $msg);
  +                $html .= sprintf("<br/><img 
src=\"?page=gif;name=icon-x\">&nbsp;ERROR: commit transaction failed, DataBase 
reports %s\n", $msg);
               }
               return($html)
           }
  @@ -1717,7 +1717,7 @@
                   $html .= "</registry>\n";
               }
               else {
  -                $html .= sprintf("<br/><img 
src=\"?page=gif;name=icon-x\">&nbsp;ERROR rollback transaction failed, DataBase 
reports %s\n", $msg);
  +                $html .= sprintf("<br/><img 
src=\"?page=gif;name=icon-x\">&nbsp;ERROR: rollback transaction failed, 
DataBase reports %s\n", $msg);
               }
               return($html)
           }
  @@ .
______________________________________________________________________
The OpenPKG Project                                    www.openpkg.org
CVS Repository Commit List                     [email protected]

Reply via email to