[Koha-cvs] koha/C4 Record.pm

[Joshua Ferraro]

CVSROOT:	/sources/koha
Module name:	koha
Branch: 	
Changes by:	Joshua Ferraro <kados at savannah.gnu.org>	06/05/24 23:30:46

Modified files:
	C4             : Record.pm 

Log message:
	fixing some misspellings, reformatting a bit, etc.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/C4/Record.pm.diff?tr1=1.1&tr2=1.2&r1=text&r2=text

Patches:
Index: koha/C4/Record.pm
diff -u koha/C4/Record.pm:1.1 koha/C4/Record.pm:1.2
--- koha/C4/Record.pm:1.1	Wed May 24 21:29:32 2006
+++ koha/C4/Record.pm	Wed May 24 23:30:43 2006
@@ -18,7 +18,7 @@
 # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
 # Suite 330, Boston, MA  02111-1307 USA
 #
-# $Id: Record.pm,v 1.1 2006/05/24 21:29:32 kados Exp $
+# $Id: Record.pm,v 1.2 2006/05/24 23:30:43 kados Exp $
 #
 use strict; use warnings; #FIXME: turn off warnings before release
 
@@ -29,7 +29,7 @@
 use vars qw($VERSION @ISA @EXPORT);
 
 # set the version for version checking
-$VERSION = do { my @v = '$Revision: 1.1 $' =~ /\d+/g;
+$VERSION = do { my @v = '$Revision: 1.2 $' =~ /\d+/g;
                 shift(@v) . "." . join("_", map {sprintf "%03d", $_ } @v); };
 
 @ISA = qw(Exporter);
@@ -58,11 +58,11 @@
 
 my $marcxml = marc2marcxml($marc,$encoding,$flavour);
 
-returns an XML scalar variable
+returns a MARCXML scalar variable
 
 C<$marc> a MARC::Record object or binary MARC record
 
-C<$encoding> UTF-8 or MARC-8 [UTF-8}
+C<$encoding> UTF-8 or MARC-8 [UTF-8]
 
 C<$flavour> MARC21 or UNIMARC
 
@@ -96,7 +96,7 @@
 	unless($encoding) {$encoding = "UTF-8"};
 	unless($flavour) {$flavour = C4::Context->preference("TemplateEncoding")};
 	#FIXME: add error handling
-	my $marc = $marcxml->new_from_xml($record,$encoding,$flavour);
+	my $marc = $marcxml->new_from_xml($marcxml,$encoding,$flavour);
 	return $marc;
 }
 
@@ -319,7 +319,8 @@
 
 Joshua Ferraro <jmf at liblime.com>
 
-=cut
 =head MODIFICATIONS
-# $Id: Record.pm,v 1.1 2006/05/24 21:29:32 kados Exp $
+
+# $Id: Record.pm,v 1.2 2006/05/24 23:30:43 kados Exp $
+
 =cut