summaryrefslogtreecommitdiff
path: root/fml/lib/File
diff options
context:
space:
mode:
authortmu <tmu>2002-10-28 10:03:26 +0000
committertmu <tmu>2002-10-28 10:03:26 +0000
commit47548b3bc65d5a7a8234fb6f7b31f3c915ade57b (patch)
tree7a19766655b6bb47e7e047f2d63b13acbd0637d6 /fml/lib/File
parenteeddb1ab65d0b97d91c48a945f5e5be6eeedeef5 (diff)
downloadfml8-47548b3bc65d5a7a8234fb6f7b31f3c915ade57b.tar.gz
fml8-47548b3bc65d5a7a8234fb6f7b31f3c915ade57b.tar.bz2
fml8-47548b3bc65d5a7a8234fb6f7b31f3c915ade57b.zip
use chomp at get_id()'s return value
Diffstat (limited to 'fml/lib/File')
-rw-r--r--fml/lib/File/Sequence.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/fml/lib/File/Sequence.pm b/fml/lib/File/Sequence.pm
index 51502419..8b153efb 100644
--- a/fml/lib/File/Sequence.pm
+++ b/fml/lib/File/Sequence.pm
@@ -4,7 +4,7 @@
# All rights reserved. This program is free software; you can
# redistribute it and/or modify it under the same terms as Perl itself.
#
-# $FML: Sequence.pm,v 1.26 2002/09/11 23:18:18 fukachan Exp $
+# $FML: Sequence.pm,v 1.27 2002/09/22 14:56:57 fukachan Exp $
#
package File::Sequence;
@@ -202,7 +202,7 @@ sub get_id
return 0;
}
- return $id;
+ return chomp($id);
}