From: Marc Mims <marc@questright.com>
Date: Wed, 3 May 2006 21:20:08 +0000 (+0000)
Subject: - Corrected a minor typo in a comment.
X-Git-Tag: v0.07002~75^2~211
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=aa8b819051204e1733a88c36c82d12dc9f2c8154;p=dbsrgits%2FDBIx-Class.git

- Corrected a minor typo in a comment.
- Added an attribution in the documentation code the module is based on.
---

diff --git a/lib/DBIx/Class/Storage/DBI/ODBC400.pm b/lib/DBIx/Class/Storage/DBI/ODBC400.pm
index 2167d13..7fdd1f8 100644
--- a/lib/DBIx/Class/Storage/DBI/ODBC400.pm
+++ b/lib/DBIx/Class/Storage/DBI/ODBC400.pm
@@ -12,7 +12,7 @@ sub last_insert_id
 
     # get the schema/table separator:
     #    '.' when SQL naming is active
-    #    '/' when sytem naming is active
+    #    '/' when system naming is active
     my $sep = $dbh->get_info(41);
     my $sth = $dbh->prepare_cached(
         "SELECT IDENTITY_VAL_LOCAL() FROM SYSIBM${sep}SYSDUMMY1", {}, 3);
@@ -46,6 +46,8 @@ This class implements autoincrements for DB2/400 over ODBC.
 
 Marc Mims C<< <marc@questright.com> >>
 
+Based on DBIx::Class::Storage::DBI::DB2 by Jess Robinson.
+
 =head1 LICENSE
 
 You may distribute this code under the same terms as Perl itself.