pt-osc modified some comments

bin/pt-online-schema-change

@@ -8562,10 +8562,12 @@ sub main {
          #   at /Users/daniel/p/pt-osc-2.1.1/lib/PerconaTest.pm line 559.
          #                   ''
          #   doesn't match '(?-xism:Failed to find a unique new table name)'
-         #my $original_error = $EVAL_ERROR;
+         
-         #
+         # (*) Frank:  commented them out because it caused infinite loop
-         # (*) commented them for now because it caused infinite loop (frank)
          # and the mentioned test error doesn't arise
+         
+         #my $original_error = $EVAL_ERROR;
+
          foreach my $task ( reverse @cleanup_tasks ) {
             eval {
                $task->();

t/pt-online-schema-change/bugs.t

@@ -435,12 +435,28 @@ $sb->load_file('master', "$sample/bug-1340728_cleanup.sql");
 
 
 # #############################################################################
-# Issue p
+# Issue LP 1446928
-#
+# Avoids an error trapping loop when --alter option contains an invalid
-# fails when no index is returned in EXPLAIN,  even though --nocheck-plan is set
+# statement.
-# (happens on HASH indexes)
+# If this test fails it might lead to "segmentation fault" or "out of memory"
 # #############################################################################
 
+$output = output(
+   sub { pt_online_schema_change::main(@args, "$master_dsn,D=sakila,t=actor",
+         '--execute', 
+         '--alter-foreign-keys-method=drop_swap',
+         '--alter', "GIBBERISH",
+         '--nocheck-plan',
+         ),
+      },
+      stderr => 1,
+);
+
+like(
+      $output,
+      qr/Error altering new table/s,
+      "Bug 1446928: Avoid error trapping loop when --alter is invalid",
+);
 
 # #############################################################################
 # Done.