Apparently, rmtree was not working.

This is related to #7, but we are adressing #5

Author: JJ

lib/Pod/To/Cached.pm6

@@ -261,6 +261,14 @@ method freeze( --> Bool ) {
     self.save-index;
 }
 
+method rm-cache() {
+    if $*SPEC ~~ IO::Spec::Win32 {
+        shell "rmdir /S /Q $.path";
+    } else {
+        shell "rm -rf $.path";
+    }
+}
+
 =begin pod
 
 =TITLE Pod::To::Cached

t/020-source.t

@@ -228,7 +228,7 @@ $cache .= new( :source( DOC ), :path( REP ));
 #--MARKER-- Test 36
 is-deeply $cache.hash-files(<Valid Old>), %( 'a-pod-file' => 'Valid', 'pod-file-to-deprecate' => 'Old'), 'hash-files with seq of statuses correct';
 # remove rep with old source
-rmtree REP;
+$cache.rm-cache;
 #restore valid source file for later tests.
 (DOC ~ '/a-pod-file.pod6').IO.spurt(q:to/POD-CONTENT/);
     =begin pod