[otrs-cvs] CVS: otrs/scripts/test CustomerBackend.pl,1.2,1.3 CustomerUserAuth.pl,1.2,1.3 TicketHistoryState.pl,1.1,1.2 UserAuth.pl,1.2,1.3

[cvs-log at otrs.org]

Update of /home/cvs/otrs/scripts/test
In directory lancelot:/tmp/cvs-serv19362/scripts/test

Modified Files:
	CustomerBackend.pl CustomerUserAuth.pl TicketHistoryState.pl 
	UserAuth.pl 
Log Message:
change copyright

Index: CustomerBackend.pl
===================================================================
RCS file: /home/cvs/otrs/scripts/test/CustomerBackend.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -r1.2 -r1.3
*** CustomerBackend.pl	13 Oct 2003 20:29:54 -0000	1.2
--- CustomerBackend.pl	3 Oct 2006 14:34:47 -0000	1.3
***************
*** 2,6 ****
  # --
  # scripts/test/CustomerBackend.pl - test script of customer backend
! # Copyright (C) 2001-2003 Martin Edenhofer <martin+code at otrs.org>
  # --
  # $Id$
--- 2,6 ----
  # --
  # scripts/test/CustomerBackend.pl - test script of customer backend
! # Copyright (C) 2001-2006 OTRS GmbH, http://otrs.org/
  # --
  # $Id$
***************
*** 10,19 ****
  # the Free Software Foundation; either version 2 of the License, or
  # (at your option) any later version.
! # 
  # This program is distributed in the hope that it will be useful,
  # but WITHOUT ANY WARRANTY; without even the implied warranty of
  # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  # GNU General Public License for more details.
! # 
  # You should have received a copy of the GNU General Public License
  # along with this program; if not, write to the Free Software
--- 10,19 ----
  # the Free Software Foundation; either version 2 of the License, or
  # (at your option) any later version.
! #
  # This program is distributed in the hope that it will be useful,
  # but WITHOUT ANY WARRANTY; without even the implied warranty of
  # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  # GNU General Public License for more details.
! #
  # You should have received a copy of the GNU General Public License
  # along with this program; if not, write to the Free Software
***************
*** 58,70 ****
--- 58,74 ----
  print "CustomerSearch()\n";
  print "----------------\n";
+ 
  my $LastCustomer = '';
  my %Customers = $CommonObject{CustomerObject}->CustomerSearch(Search => $SearchUser);
+ 
  foreach (keys %Customers) {
      $LastCustomer = $_;
      print "$_: $Customers{$_}\n";
  }
+ 
  print "\n";
  print "CustomerUserDataGet()\n";
  print "---------------------\n";
+ 
  if ($LastCustomer) {
      print "Show Customer User Data of '$LastCustomer':\n";
***************
*** 81,84 ****
--- 85,89 ----
  print "CustomerName()\n";
  print "--------------\n";
+ 
  if ($LastCustomer) {
      print "Show Customer User Name of '$LastCustomer':\n";
***************
*** 89,92 ****
      print "No Customer Found!\n";
  }
- print "\n";
  
--- 94,97 ----
      print "No Customer Found!\n";
  }
  
+ print "\n";

Index: CustomerUserAuth.pl
===================================================================
RCS file: /home/cvs/otrs/scripts/test/CustomerUserAuth.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -r1.2 -r1.3
*** CustomerUserAuth.pl	13 Oct 2003 20:29:54 -0000	1.2
--- CustomerUserAuth.pl	3 Oct 2006 14:34:47 -0000	1.3
***************
*** 1,6 ****
  #!/usr/bin/perl -w
  # --
! # scripts/test/CustomerUserAuth.pl - test script of user auth 
! # Copyright (C) 2003 Martin Edenhofer <martin+code at otrs.org>
  # --
  # $Id$
--- 1,6 ----
  #!/usr/bin/perl -w
  # --
! # scripts/test/CustomerUserAuth.pl - test script of user auth
! # Copyright (C) 2001-2006 OTRS GmbH, http://otrs.org/
  # --
  # $Id$
***************
*** 10,19 ****
  # the Free Software Foundation; either version 2 of the License, or
  # (at your option) any later version.
! # 
  # This program is distributed in the hope that it will be useful,
  # but WITHOUT ANY WARRANTY; without even the implied warranty of
  # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  # GNU General Public License for more details.
! # 
  # You should have received a copy of the GNU General Public License
  # along with this program; if not, write to the Free Software
--- 10,19 ----
  # the Free Software Foundation; either version 2 of the License, or
  # (at your option) any later version.
! #
  # This program is distributed in the hope that it will be useful,
  # but WITHOUT ANY WARRANTY; without even the implied warranty of
  # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  # GNU General Public License for more details.
! #
  # You should have received a copy of the GNU General Public License
  # along with this program; if not, write to the Free Software
***************
*** 56,64 ****
--- 56,67 ----
  print "User: '$User'\n";
  print "Password: ";
+ 
  my $Pw = <STDIN>;
  chomp $Pw;
+ 
  print "\n";
  print "Auth()\n";
  print "------\n";
+ 
  if ($CommonObject{AuthObject}->Auth(User => $User, Pw => $Pw)) {
      print "Successfully!\n";
***************
*** 67,70 ****
      print "Faild!\n";
  }
- print "\n";
  
--- 70,73 ----
      print "Faild!\n";
  }
  
+ print "\n";

Index: TicketHistoryState.pl
===================================================================
RCS file: /home/cvs/otrs/scripts/test/TicketHistoryState.pl,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -r1.1 -r1.2
*** TicketHistoryState.pl	8 Sep 2004 12:58:53 -0000	1.1
--- TicketHistoryState.pl	3 Oct 2006 14:34:47 -0000	1.2
***************
*** 2,6 ****
  # --
  # scripts/test/TicketHistoryState.pl - test script of user auth
! # Copyright (C) 2001-2004 Martin Edenhofer <martin+code at otrs.org>
  # --
  # $Id$
--- 2,6 ----
  # --
  # scripts/test/TicketHistoryState.pl - test script of user auth
! # Copyright (C) 2001-2006 OTRS GmbH, http://otrs.org/
  # --
  # $Id$
***************
*** 60,66 ****
  print "HistoryTicketGet()\n";
  print "------\n";
  my %Ticket = $CommonObject{TicketObject}->HistoryTicketGet(TicketID => $TicketID, TimeStamp => $TimeStamp);
  foreach (sort keys %Ticket) {
! print "$_: $Ticket{$_}\n";
  }
  
--- 60,68 ----
  print "HistoryTicketGet()\n";
  print "------\n";
+ 
  my %Ticket = $CommonObject{TicketObject}->HistoryTicketGet(TicketID => $TicketID, TimeStamp => $TimeStamp);
+ 
  foreach (sort keys %Ticket) {
!     print "$_: $Ticket{$_}\n";
  }
  

Index: UserAuth.pl
===================================================================
RCS file: /home/cvs/otrs/scripts/test/UserAuth.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -r1.2 -r1.3
*** UserAuth.pl	13 Oct 2003 20:29:54 -0000	1.2
--- UserAuth.pl	3 Oct 2006 14:34:47 -0000	1.3
***************
*** 1,6 ****
  #!/usr/bin/perl -w
  # --
! # scripts/test/UserAuth.pl - test script of user auth 
! # Copyright (C) 2003 Martin Edenhofer <martin+code at otrs.org>
  # --
  # $Id$
--- 1,6 ----
  #!/usr/bin/perl -w
  # --
! # scripts/test/UserAuth.pl - test script of user auth
! # Copyright (C) 2001-2006 OTRS GmbH, http://otrs.org/
  # --
  # $Id$
***************
*** 10,19 ****
  # the Free Software Foundation; either version 2 of the License, or
  # (at your option) any later version.
! # 
  # This program is distributed in the hope that it will be useful,
  # but WITHOUT ANY WARRANTY; without even the implied warranty of
  # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  # GNU General Public License for more details.
! # 
  # You should have received a copy of the GNU General Public License
  # along with this program; if not, write to the Free Software
--- 10,19 ----
  # the Free Software Foundation; either version 2 of the License, or
  # (at your option) any later version.
! #
  # This program is distributed in the hope that it will be useful,
  # but WITHOUT ANY WARRANTY; without even the implied warranty of
  # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  # GNU General Public License for more details.
! #
  # You should have received a copy of the GNU General Public License
  # along with this program; if not, write to the Free Software
***************
*** 56,64 ****
--- 56,67 ----
  print "User: '$User'\n";
  print "Password: ";
+ 
  my $Pw = <STDIN>;
  chomp $Pw;
+ 
  print "\n";
  print "Auth()\n";
  print "------\n";
+ 
  if ($CommonObject{AuthObject}->Auth(User => $User, Pw => $Pw)) {
      print "Successfully!\n";
***************
*** 67,70 ****
      print "Faild!\n";
  }
- print "\n";
  
--- 70,73 ----
      print "Faild!\n";
  }
  
+ print "\n";