OCD - undo some incorrect changes of non-typos from 4a0eed5

Perl5 · Aug 22, 2013 · a4f0b0a · a4f0b0a
1 parent 4a0eed5
commit a4f0b0a
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/lib/DBIx/Class/SQLMaker.pm b/lib/DBIx/Class/SQLMaker.pm
@@ -288,7 +288,7 @@ sub _parse_rs_attrs {
   my $sql = '';
 
   if ($arg->{group_by}) {
-    # horrible, waiting for refactor
+    # horrible horrible, waiting for refactor
     local $self->{select_bind};
     if (my $g = $self->_recurse_fields($arg->{group_by}) ) {
       $sql .= $self->_sqlcase(' group by ') . $g;

diff --git a/lib/DBIx/Class/Storage/BlockRunner.pm b/lib/DBIx/Class/Storage/BlockRunner.pm
@@ -114,7 +114,7 @@ sub run {
 
 # this is the actual recursing worker
 sub _run {
-  # warnings here mean I did not anticipate some uber-complex case
+  # warnings here mean I did not anticipate some ueber-complex case
   # fatal warnings are not warranted
   no warnings;
   use warnings;