blob: 26cb9a9a067ef46b061f3be918bad71879c5c9de (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
package Bugzilla::PatchReader::Base;
use 5.10.1;
use strict;
use warnings;
sub new {
my $class = shift;
$class = ref($class) || $class;
my $this = {};
bless $this, $class;
return $this;
}
sub sends_data_to {
my $this = shift;
if (defined($_[0])) {
$this->{TARGET} = $_[0];
} else {
return $this->{TARGET};
}
}
1
|