|
Revision 53, 1.1 kB
(checked in by bkuhn, 10 months ago)
|
- Added SFLC's internally developed tim bot released under AGPLv3
|
| Line | |
|---|
| 1 |
# Copyright (C) 2005 Software Freedom Law Center, Inc. |
|---|
| 2 |
# Author: Bradley M. Kuhn <bkuhn@softwarefreedom.org> |
|---|
| 3 |
# |
|---|
| 4 |
# This software gives you freedom; it is licensed to you under version |
|---|
| 5 |
# 3 of the GNU Affero General Public License. |
|---|
| 6 |
# |
|---|
| 7 |
# This software is distributed WITHOUT ANY WARRANTY, without even the |
|---|
| 8 |
# implied warranties of MERCHANTABILITY and FITNESS FOR A PARTICULAR |
|---|
| 9 |
# PURPOSE. See the GNU Affero General Public License for further |
|---|
| 10 |
# details. |
|---|
| 11 |
# |
|---|
| 12 |
# You should have received a copy of the GNU Affero General Public |
|---|
| 13 |
# License, version 3 along with this software. If not, see |
|---|
| 14 |
# <http://www.gnu.org/licenses/>. |
|---|
| 15 |
package SFLC::TimeTracker::Output::Statement; |
|---|
| 16 |
|
|---|
| 17 |
use base qw(SFLC::TimeTracker::Output::Dummy); |
|---|
| 18 |
|
|---|
| 19 |
use Lingua::EN::Inflect qw ( PL); |
|---|
| 20 |
use Date::Manip; |
|---|
| 21 |
|
|---|
| 22 |
############################################################################### |
|---|
| 23 |
sub new { |
|---|
| 24 |
my($class) = shift; |
|---|
| 25 |
|
|---|
| 26 |
my %input = @_; |
|---|
| 27 |
|
|---|
| 28 |
$self = SFLC::TimeTracker::Output::Dummy::new($class, %input); |
|---|
| 29 |
return $self; |
|---|
| 30 |
} |
|---|
| 31 |
############################################################################### |
|---|
| 32 |
1; |
|---|
| 33 |
__END__ |
|---|
| 34 |
|
|---|
| 35 |
# |
|---|
| 36 |
# Local variables: |
|---|
| 37 |
# compile-command: "perl -I ../../../../Modules -c Statement.pm" |
|---|
| 38 |
# End: |
|---|