Author: timbo
Date: Thu Apr 1 02:04:11 2010
New Revision: 13880
Modified:
dbi/trunk/Changes
dbi/trunk/DBI.pm
dbi/trunk/dbixs_rev.h
Log:
Tweak whitespace in DBI.pm docs. Pick up bumped DBIXS_REVISION.
Modified: dbi/trunk/Changes
==============================================================================
--- dbi/trunk/Changes (original)
+++ dbi/trunk/Changes Thu Apr 1 02:04:11 2010
@@ -6,6 +6,8 @@
=cut
+=head2 Changes in DBI 1.612 (svn XXX)
+
=head2 Changes in DBI 1.611 (svn r13833) 2nd March 2010
NOTE: minimum perl version is now 5.8.1 (as announced in DBI 1.607)
Modified: dbi/trunk/DBI.pm
==============================================================================
--- dbi/trunk/DBI.pm (original)
+++ dbi/trunk/DBI.pm Thu Apr 1 02:04:11 2010
@@ -1,5 +1,5 @@
# $Id$
-# vim: ts=8:sw=4:noet
+# vim: ts=8:sw=4:et
#
# Copyright (c) 1994-2010 Tim Bunce Ireland
#
@@ -4044,7 +4044,7 @@
You can also prevent the associated method from ever executing. While a
callback executes, C<$_> holds the method name. (This allows multiple callbacks
to share the same code reference and still know what method was called.)
-To prevent the method from
+To prevent the method from
executing, simply C<undef $_>. For example, if you wanted to disable calls to
C<ping()>, you could do this:
@@ -4170,7 +4170,7 @@
my $prev_cb = $h->{Callbacks}{method_name};
$h->{Callbacks}{method_name} = sub {
if ($prev_cb) {
- my @result = $prev_cb->(@_);
+ my @result = $prev_cb->(@_);
return @result if not $_; # $prev_cb vetoed call
}
... your callback logic here ...
Modified: dbi/trunk/dbixs_rev.h
==============================================================================
--- dbi/trunk/dbixs_rev.h (original)
+++ dbi/trunk/dbixs_rev.h Thu Apr 1 02:04:11 2010
@@ -1,3 +1,4 @@
-/* Tue Nov 24 13:22:17 2009 */
-/* Mixed revision working copy (13590:13592) */
-#define DBIXS_REVISION 13590
+/* Sun Mar 7 23:13:07 2010 */
+/* Mixed revision working copy (13835M:13836) */
+/* Code modified since last checkin */
+#define DBIXS_REVISION 13835
