1<?xml version="1.0"?>
 2<CodeSnippets xmlns="http://schemas.microsoft.com/VisualStudio/2005/CodeSnippet">
 3  <CodeSnippet Format="1.0.0">
 4    <Header>
 5      <Title>TestSuiteFixture</Title>
 6      <Author>MbUnit</Author>
 7      <Description>Expansion snippet for TestSuiteFixture</Description>
 8      <Shortcut>testsuitefixture</Shortcut>
 9      <SnippetTypes>
10        <SnippetType>Expansion</SnippetType>
11      </SnippetTypes>
12    </Header>
13    <Snippet>
14      <Declarations>
15        <Literal>
16          <ID>namespace</ID>
17          <ToolTip>Test namespace</ToolTip>
18          <Default>MbUnitTests</Default>
19        </Literal>
20        <Literal>
21          <ID>name</ID>
22          <ToolTip>Fixture name</ToolTip>
23          <Default>My</Default>
24        </Literal>
25        <Literal>
26          <ID>suiteName</ID>
27          <ToolTip>Suite name</ToolTip>
28          <Default>Suite</Default>
29        </Literal>
30      </Declarations>
31      <Code Language="VB"><![CDATA[Imports System
32Imports MbUnit.Framework
33
34Namespace $namespace$
35    <TestSuiteFixture()> _
36    Public Class $name$Test
37        <TestSuite()> _
38        Public Function $suiteName$() As TestSuite 
39            Dim suite As TestSuite = New TestSuite("$suiteName$")
40			                   
41            Return suite
42        End Function
43    End Class
44End Namespace 
45	]]></Code>
46    </Snippet>
47  </CodeSnippet>
48</CodeSnippets>