← Back to branch summary

~ubuntu-branches/ubuntu/natty/otrs2/natty-updates

« back to all changes in this revision

Viewing changes to Kernel/Modules/CustomerPreferences.pm

  • Committer: Package Import Robot
  • Author(s): Torsten Werner
  • Date: 2007-04-14 17:58:55 UTC
  • mto: (20.1.1 squeeze)
  • mto: This revision was merged to the branch mainline in revision 6.
  • Revision ID: package-import@ubuntu.com-20070414175855-9ne0w01yu1q44ch0
Tags: upstream-2.1.7
Import upstream version 2.1.7

Show diffs side-by-side

added added

removed removed

Lines of Context:
Kernel/Modules/CustomerPreferences.pm
1
1
# --
2
2
# Kernel/Modules/CustomerPreferences.pm - provides agent preferences
3
 
# Copyright (C) 2001-2005 Martin Edenhofer <martin+code@otrs.org>
 
3
# Copyright (C) 2001-2006 OTRS GmbH, http://otrs.org/
4
4
# --
5
 
# $Id: CustomerPreferences.pm,v 1.11 2005/07/08 19:08:10 martin Exp $
 
5
# $Id: CustomerPreferences.pm,v 1.13 2006/11/02 12:20:52 tr Exp $
6
6
# --
7
7
# This software comes with ABSOLUTELY NO WARRANTY. For details, see
8
8
# the enclosed file COPYING for license information (GPL). If you
14
14
use strict;
15
15
 
16
16
use vars qw($VERSION);
17
 
$VERSION = '$Revision: 1.11 $';
 
17
$VERSION = '$Revision: 1.13 $';
18
18
$VERSION =~ s/^\$.*:\W(.*)\W.+?$/$1/;
19
19
 
20
 
# --
21
20
sub new {
22
21
    my $Type = shift;
23
22
    my %Param = @_;
43
42
 
44
43
    return $Self;
45
44
}
46
 
# --
 
45
 
47
46
sub Run {
48
47
    my $Self = shift;
49
48
    my %Param = @_;
124
123
        return $Output;
125
124
    }
126
125
}
127
 
# --
 
126
 
128
127
sub CustomerPreferencesForm {
129
128
    my $Self = shift;
130
129
    my %Param = @_;