X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Finflate%2Ffile_column.t;h=1b69e51de8ddc7094cbbcaa6fe2773cc59c4ead0;hb=961d79dbe25ef8a92e867fcc84914b4bf568c11d;hp=e200619db6cf9c9a19e1bb090954e8fbfe30bf67;hpb=9fb047556029305e3df06e50ec0fd0c995617811;p=dbsrgits%2FDBIx-Class.git diff --git a/t/inflate/file_column.t b/t/inflate/file_column.t index e200619..1b69e51 100644 --- a/t/inflate/file_column.t +++ b/t/inflate/file_column.t @@ -88,7 +88,7 @@ $fh = $new_source_file->open('r') or die "failed to open $new_source_file: $!\n" $fc->file({ handle => $fh, filename => $new_fname }); $fc->update; -TODO: { +{ local $TODO = 'design change required'; ok ( ! -e $storage, 'old storage does not exist' ); }; @@ -120,8 +120,8 @@ $storage = file( $fc->file->{filename}, ); -TODO: { +{ local $TODO = 'need resultset delete override to delete_all'; $rs->delete; ok ( ! -e $storage, 'storage does not exist after $rs->delete' ); -}; +}