# HG changeset patch
# User cin
# Date 1398724584 -14400
# Node ID f1ce08199a083a76f4dc6aa95d1929e38033f92b
# Parent  aac1085b256d424b951b3679be22952148f87d82
stubs

diff -r aac1085b256d -r f1ce08199a08 .hgignore
--- a/.hgignore	Sat Mar 15 00:34:33 2014 +0400
+++ b/.hgignore	Tue Apr 29 02:36:24 2014 +0400
@@ -1,3 +1,6 @@
 syntax: glob
 config/
 mysql-data/
+
+syntax: regexp
+^tests/config\.pm$
\ No newline at end of file
diff -r aac1085b256d -r f1ce08199a08 tests/test_ttfs.pl
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/tests/test_ttfs.pl	Tue Apr 29 02:36:24 2014 +0400
@@ -0,0 +1,28 @@
+#!/usr/bin/perl
+use strict;
+use lib '.';
+use config;
+
+use IMPL::Config();
+use IMPL::require {
+	TTSelector => 'IMPL::Web::View::TTFsSelector',
+	Dumper => 'Data::Dumper'
+};
+
+
+my $selector = TTSelector->new(
+	isContainer => 1,
+	ext => '.tt',
+	path => IMPL::Config->AppDir('view','site')
+);
+
+my $match = $selector->MatchPath(
+	[
+	    { name => 'library'},
+		{ name => 'index', class => 'Some::Collection' },
+		{ name => 'compounds' },
+		{ name => 'asd--df-sd-f--ds-we', class => 'Some::Compound' }
+	]
+);
+
+print Dumper->Dump([$match]);
\ No newline at end of file
diff -r aac1085b256d -r f1ce08199a08 view/layout/default.tt
diff -r aac1085b256d -r f1ce08199a08 view/site/index.tt
diff -r aac1085b256d -r f1ce08199a08 view/site/library.tt
diff -r aac1085b256d -r f1ce08199a08 view/site/library/@Collection.tt
diff -r aac1085b256d -r f1ce08199a08 view/site/library/_any/@Compound.tt
diff -r aac1085b256d -r f1ce08199a08 view/site/library/_any/@Member.tt