Support JSON cassettes in unit tests by passing a filename ending in .json

Author: MrRio

PHPUnit/Util/Log/VCR.php

@@ -119,14 +119,19 @@ public function startTest(PHPUnit_Framework_Test $test)
         $doc_block  = $reflection->getDocComment();
 
         // Use regex to parse the doc_block for a specific annotation
-        $cassetteName = self::parseDocBlock($doc_block, '@vcr');
+        $cassetteName = array_pop(self::parseDocBlock($doc_block, '@vcr'));
+
+        // If the cassette name ends in .json, then use the JSON storage format
+        if (substr($cassetteName, '-5') == '.json') {
+            \VCR\VCR::configure()->setStorage('json');
+        }
 
         if (empty($cassetteName)) {
             return true;
         }
 
         \VCR\VCR::turnOn();
-        \VCR\VCR::insertCassette(array_pop($cassetteName));
+        \VCR\VCR::insertCassette($cassetteName);
     }
 
     private static function parseDocBlock($doc_block, $tag)