From 280215a08a6462fc2d3d5797e2429762e6718b77 Mon Sep 17 00:00:00 2001
From: fukachan <fukachan>
Date: Tue, 23 Jan 2001 13:14:03 +0000
Subject: implement primitive ticket system (toymodel)

---
 fml/lib/FML/Ticket/System.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'fml/lib/FML/Ticket/System.pm')

diff --git a/fml/lib/FML/Ticket/System.pm b/fml/lib/FML/Ticket/System.pm
index cee01771..69811e6b 100644
--- a/fml/lib/FML/Ticket/System.pm
+++ b/fml/lib/FML/Ticket/System.pm
@@ -8,7 +8,7 @@
 # $FML$
 #
 
-package Ticket::System;
+package FML::Ticket::System;
 use strict;
 use vars qw(@ISA @EXPORT @EXPORT_OK);
 use Carp;
@@ -28,7 +28,7 @@ sub new
 
 sub increment_id
 {
-    my ($self, $file) = @_;
+    my ($self, $seq_file) = @_;
 
     use FML::SequenceFile;
     my $sfh = new FML::SequenceFile { sequence_file => $seq_file };
-- 
cgit v1.2.1