radiant-site_area_tags-extension 1.0.0

data/README

@@ -0,0 +1,16 @@
+= Site Area Tags
+
+Adds a few Radius tags concerning site "sections" or "area's". These are 100% extracted from the Trike Tags extension:
+https://github.com/tricycle/radiant-trike-tags-extension
+
+<r:site_area /> Renders the slug of the top-most parent page which is not the homepage
+<r:site_sub_area /> Renders the second level parent page slug
+
+<r:if_same_site_area />     and
+<r:if_same_site_sub_area /> Render their contents if the local page context is in the same site
+(sub-)area as the global page context
+This is typically used inside another tag (like <pre><code><r:children:each></code></pre>) to add
+conditional mark-up if the child element is in the current site area.
+
+<r:unless_same_site_sub_area /> and
+<r:unless_same_site_sub_area /> are also available

data/Rakefile

@@ -0,0 +1,117 @@
+# Determine where the RSpec plugin is by loading the boot
+unless defined? RADIANT_ROOT
+  ENV["RAILS_ENV"] = "test"
+  case
+  when ENV["RADIANT_ENV_FILE"]
+    require File.dirname(ENV["RADIANT_ENV_FILE"]) + "/boot"
+  when File.dirname(__FILE__) =~ %r{vendor/radiant/vendor/extensions}
+    require "#{File.expand_path(File.dirname(__FILE__) + "/../../../../../")}/config/boot"
+  else
+    require "#{File.expand_path(File.dirname(__FILE__) + "/../../../")}/config/boot"
+  end
+end
+
+require 'rake'
+require 'rake/rdoctask'
+require 'rake/testtask'
+
+rspec_base = File.expand_path(RADIANT_ROOT + '/vendor/plugins/rspec/lib')
+$LOAD_PATH.unshift(rspec_base) if File.exist?(rspec_base)
+require 'spec/rake/spectask'
+require 'cucumber'
+require 'cucumber/rake/task'
+
+# Cleanup the RADIANT_ROOT constant so specs will load the environment
+Object.send(:remove_const, :RADIANT_ROOT)
+
+extension_root = File.expand_path(File.dirname(__FILE__))
+
+task :default => :spec
+task :stats => "spec:statsetup"
+
+desc "Run all specs in spec directory"
+Spec::Rake::SpecTask.new(:spec) do |t|
+  t.spec_opts = ['--options', "\"#{extension_root}/spec/spec.opts\""]
+  t.spec_files = FileList['spec/**/*_spec.rb']
+end
+
+task :features => 'spec:integration'
+
+namespace :spec do
+  desc "Run all specs in spec directory with RCov"
+  Spec::Rake::SpecTask.new(:rcov) do |t|
+    t.spec_opts = ['--options', "\"#{extension_root}/spec/spec.opts\""]
+    t.spec_files = FileList['spec/**/*_spec.rb']
+    t.rcov = true
+    t.rcov_opts = ['--exclude', 'spec', '--rails']
+  end
+  
+  desc "Print Specdoc for all specs"
+  Spec::Rake::SpecTask.new(:doc) do |t|
+    t.spec_opts = ["--format", "specdoc", "--dry-run"]
+    t.spec_files = FileList['spec/**/*_spec.rb']
+  end
+
+  [:models, :controllers, :views, :helpers].each do |sub|
+    desc "Run the specs under spec/#{sub}"
+    Spec::Rake::SpecTask.new(sub) do |t|
+      t.spec_opts = ['--options', "\"#{extension_root}/spec/spec.opts\""]
+      t.spec_files = FileList["spec/#{sub}/**/*_spec.rb"]
+    end
+  end
+  
+  desc "Run the Cucumber features"
+  Cucumber::Rake::Task.new(:integration) do |t|
+    t.fork = true
+    t.cucumber_opts = ['--format', (ENV['CUCUMBER_FORMAT'] || 'pretty')]
+    # t.feature_pattern = "#{extension_root}/features/**/*.feature"
+    t.profile = "default"
+  end
+
+  # Setup specs for stats
+  task :statsetup do
+    require 'code_statistics'
+    ::STATS_DIRECTORIES << %w(Model\ specs spec/models)
+    ::STATS_DIRECTORIES << %w(View\ specs spec/views)
+    ::STATS_DIRECTORIES << %w(Controller\ specs spec/controllers)
+    ::STATS_DIRECTORIES << %w(Helper\ specs spec/views)
+    ::CodeStatistics::TEST_TYPES << "Model specs"
+    ::CodeStatistics::TEST_TYPES << "View specs"
+    ::CodeStatistics::TEST_TYPES << "Controller specs"
+    ::CodeStatistics::TEST_TYPES << "Helper specs"
+    ::STATS_DIRECTORIES.delete_if {|a| a[0] =~ /test/}
+  end
+
+  namespace :db do
+    namespace :fixtures do
+      desc "Load fixtures (from spec/fixtures) into the current environment's database.  Load specific fixtures using FIXTURES=x,y"
+      task :load => :environment do
+        require 'active_record/fixtures'
+        ActiveRecord::Base.establish_connection(RAILS_ENV.to_sym)
+        (ENV['FIXTURES'] ? ENV['FIXTURES'].split(/,/) : Dir.glob(File.join(RAILS_ROOT, 'spec', 'fixtures', '*.{yml,csv}'))).each do |fixture_file|
+          Fixtures.create_fixtures('spec/fixtures', File.basename(fixture_file, '.*'))
+        end
+      end
+    end
+  end
+end
+
+desc 'Generate documentation for the site_area_tags extension.'
+Rake::RDocTask.new(:rdoc) do |rdoc|
+  rdoc.rdoc_dir = 'rdoc'
+  rdoc.title    = 'SiteAreaTagsExtension'
+  rdoc.options << '--line-numbers' << '--inline-source'
+  rdoc.rdoc_files.include('README')
+  rdoc.rdoc_files.include('lib/**/*.rb')
+end
+
+# For extensions that are in transition
+desc 'Test the site_area_tags extension.'
+Rake::TestTask.new(:test) do |t|
+  t.libs << 'lib'
+  t.pattern = 'test/**/*_test.rb'
+  t.verbose = true
+end
+
+# Load any custom rakefiles for extension
+Dir[File.dirname(__FILE__) + '/tasks/*.rake'].sort.each { |f| require f }

data/app/models/site_area_tags.rb

@@ -0,0 +1,154 @@
+module SiteAreaTags
+  include Radiant::Taggable
+  
+  desc %{
+    Renders the slug of the top-most parent page which is not the homepage
+    This functions nicely as a site area (or “section”) name
+
+    *Usage:*
+    <pre><code><r:site_area /></code></pre>
+  }
+  tag "site_area" do |tag|
+    site_area(tag)
+  end
+
+  desc %{
+    Renders the second level parent page slug
+    (which functions nicely as a site sub-area name)
+
+    *Usage:*
+    <pre><code><r:site_subarea /></code></pre>
+  }
+  tag "site_subarea" do |tag|
+    site_subarea(tag)
+  end
+  
+  desc %{
+    Renders the contents of this tag if the local page context is in the same site
+    area as the global page context (see <pre><code><r:site_area /></code></pre>)
+    
+    This is typically used inside another tag (like <pre><code><r:children:each></code></pre>) to add
+    conditional mark-up if the child element is in the current site area.
+
+    *Usage:*
+    <pre><code><r:if_same_site_area>…</if_same_site_area></code></pre>
+    
+    *Example:*
+    <pre><code>
+    <r:children:each>
+    <r:link><r:title /><r:if_same_site_area>*</r:if_same_site_area></r:link>
+    </r:children:each>
+    </code></pre>
+  }
+  tag 'if_same_site_area' do |tag|
+    tag.expand if same_site_area?(tag)
+  end
+  
+  desc %{
+    Renders the contents of this tag unless the local page context is in the same site
+    area as the global page context (see <pre><code><r:if_same_site_area /></code></pre> and <pre><code><r:site_area /></code></pre>)
+    
+    This is typically used inside another tag (like <pre><code><r:children:each></code></pre>) to add
+    conditional mark-up if the child element is not in the current site area.
+
+    *Usage:*
+    <pre><code><r:unless_same_site_area>…</unless_same_site_area></code></pre>
+  }
+  tag 'unless_same_site_area' do |tag|
+    tag.expand unless same_site_area?(tag)
+  end
+  
+  desc %{
+    Renders the contents of this tag if the local page context is in the same site
+    subarea as the global page context (see <pre><code><r:site_subarea /></code></pre>)
+    
+    This is typically used inside another tag (like <pre><code><r:children:each></code></pre>) to add
+    conditional mark-up if the child element is in the same site sub-area as 
+    the actual page.
+
+    *Usage:*
+    <pre><code><r:if_same_site_subarea>…</if_same_site_subarea></code></pre>
+  }
+  tag 'if_same_site_subarea' do |tag|
+    tag.expand if same_site_subarea?(tag)
+  end
+  
+  desc %{
+    Renders the contents of this tag unless the local page context is in the same site
+    subarea as the global page context (see <pre><code><r:site_subarea /></code></pre>)
+    
+    This is typically used inside another tag (like <r:children:each>) to add
+    conditional mark-up if the child element is is note in the same site sub-area
+    as the actual page.
+
+    *Usage:*
+    <pre><code><r:unless_same_site_subarea>…</unless_same_site_subarea></code></pre>
+  }
+  tag 'unless_same_site_subarea' do |tag|
+    tag.expand unless same_site_subarea?(tag)
+  end
+
+private
+
+  def site_area(tag)
+    page = tag.locals.page
+    unless page.part("site_area").nil?
+      page.part("site_area").content
+    else
+      site_area = case page.ancestors.length
+                  when 0
+                    "homepage"
+                  when 1
+                    page.slug
+                  else
+                    page.ancestors[-2].slug
+                  end
+      if site_area =~ /^\d/
+        site_area = "n#{site_area}"
+      end
+      site_area
+    end
+  end
+
+  def site_subarea(tag)
+    page = tag.locals.page
+    unless page.part("site_subarea").nil?
+      page.part("site_subarea").content
+    else
+      site_area = case page.ancestors.length
+                  when 0..1
+                    ""
+                  when 2
+                    page.slug
+                  else
+                    page.ancestors[-3].slug
+                  end
+      if site_area =~ /^\d/
+        site_area = "n#{site_area}"
+      end
+      site_area
+    end
+  end
+  
+  def same_site_area?(tag)
+    local_page = tag.locals.page
+    local_site_area = site_area(tag)
+    
+    tag.locals.page = tag.globals.page
+    global_site_area = site_area(tag)
+    
+    tag.locals.page = local_page
+    
+    local_site_area == global_site_area
+  end
+  
+  def same_site_subarea?(tag)
+    local_page = tag.locals.page
+    local_site_subarea = site_subarea(tag)
+    tag.locals.page = tag.globals.page
+    global_site_subarea = site_subarea(tag)
+    tag.locals.page = local_page
+
+    ((local_site_subarea == global_site_subarea) and (local_site_subarea != "" or global_site_subarea != ""))
+  end
+end

data/lib/radiant-site_area_tags-extension.rb

@@ -0,0 +1,2 @@
+module RadiantSiteAreaTagsExtension
+end

data/lib/radiant-site_area_tags-extension/version.rb

@@ -0,0 +1,3 @@
+module RadiantSiteAreaTagsExtension
+  VERSION = '1.0.0'
+end

data/lib/tasks/site_area_tags_extension_tasks.rake

@@ -0,0 +1,55 @@
+namespace :radiant do
+  namespace :extensions do
+    namespace :site_area_tags do
+      
+      desc "Runs the migration of the Site Area Tags extension"
+      task :migrate => :environment do
+        require 'radiant/extension_migrator'
+        if ENV["VERSION"]
+          SiteAreaTagsExtension.migrator.migrate(ENV["VERSION"].to_i)
+          Rake::Task['db:schema:dump'].invoke
+        else
+          SiteAreaTagsExtension.migrator.migrate
+          Rake::Task['db:schema:dump'].invoke
+        end
+      end
+      
+      desc "Copies public assets of the Site Area Tags to the instance public/ directory."
+      task :update => :environment do
+        is_svn_or_dir = proc {|path| path =~ /\.svn/ || File.directory?(path) }
+        puts "Copying assets from SiteAreaTagsExtension"
+        Dir[SiteAreaTagsExtension.root + "/public/**/*"].reject(&is_svn_or_dir).each do |file|
+          path = file.sub(SiteAreaTagsExtension.root, '')
+          directory = File.dirname(path)
+          mkdir_p RAILS_ROOT + directory, :verbose => false
+          cp file, RAILS_ROOT + path, :verbose => false
+        end
+        unless SiteAreaTagsExtension.root.starts_with? RAILS_ROOT # don't need to copy vendored tasks
+          puts "Copying rake tasks from SiteAreaTagsExtension"
+          local_tasks_path = File.join(RAILS_ROOT, %w(lib tasks))
+          mkdir_p local_tasks_path, :verbose => false
+          Dir[File.join SiteAreaTagsExtension.root, %w(lib tasks *.rake)].each do |file|
+            cp file, local_tasks_path, :verbose => false
+          end
+        end
+      end  
+      
+      desc "Syncs all available translations for this ext to the English ext master"
+      task :sync => :environment do
+        # The main translation root, basically where English is kept
+        language_root = SiteAreaTagsExtension.root + "/config/locales"
+        words = TranslationSupport.get_translation_keys(language_root)
+        
+        Dir["#{language_root}/*.yml"].each do |filename|
+          next if filename.match('_available_tags')
+          basename = File.basename(filename, '.yml')
+          puts "Syncing #{basename}"
+          (comments, other) = TranslationSupport.read_file(filename, basename)
+          words.each { |k,v| other[k] ||= words[k] }  # Initializing hash variable as empty if it does not exist
+          other.delete_if { |k,v| !words[k] }         # Remove if not defined in en.yml
+          TranslationSupport.write_file(filename, basename, comments, other)
+        end
+      end
+    end
+  end
+end

data/radiant-site_area_tags-extension.gemspec

@@ -0,0 +1,24 @@
+# -*- encoding: utf-8 -*-
+$:.push File.expand_path("../lib", __FILE__)
+require "radiant-site_area_tags-extension/version"
+
+Gem::Specification.new do |s|
+  s.name        = "radiant-site_area_tags-extension"
+  s.version     = RadiantSiteAreaTagsExtension::VERSION
+  s.platform    = Gem::Platform::RUBY
+  s.authors     = ["Benny Degezelle"]
+  s.email       = ["benny@gorilla-webdesign.be"]
+  s.homepage    = "http://github.com/jomz/radiant-site_area_tags-extension"
+  s.summary     = %q{Site Area Tags for Radiant CMS}
+  s.description = %q{Makes Radiant better by adding site_area_tags!}
+
+  s.files         = `git ls-files`.split("\n")
+  s.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
+  s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+  s.require_paths = ["lib"]
+  
+  s.post_install_message = %{
+  Add this to your radiant project with:
+    config.gem 'radiant-site_area_tags-extension', :version => '#{RadiantSiteAreaTagsExtension::VERSION}'
+  }
+end

data/site_area_tags_extension.rb

@@ -0,0 +1,10 @@
+require 'radiant-site_area_tags-extension/version'
+class SiteAreaTagsExtension < Radiant::Extension
+  version RadiantSiteAreaTagsExtension::VERSION
+  description "Adds site_area_tags to Radiant."
+  url "http://github.com/jomz/radiant-site_area_tags-extension"
+  
+  def activate
+    Page.send :include, SiteAreaTags
+  end
+end

data/spec/models/site_area_tags_spec.rb

@@ -0,0 +1,339 @@
+require File.dirname(__FILE__) + '/../spec_helper'
+
+describe "site_area tags :" do
+  dataset :users, :home_page
+
+  before do
+    create_page "First" do
+      create_page "First Child"
+    end
+    create_page "Parent" do
+      create_page "Child" do
+        create_page "Grandchild" do
+          create_page "Great Grandchild"
+        end
+      end
+    end
+  end
+
+  describe "<r:site_area />" do
+    fixture = [
+      #  From page          Expectation
+      [:home,             'homepage'],
+      [:parent,           'parent'],  
+      [:child,            'parent'],
+      [:grandchild,       'parent'],
+      [:great_grandchild, 'parent'],
+    ]
+    fixture.each do |page, expectation|
+      it "should return the top level parent page slug (from #{page})" do
+        page(page).should render("<r:site_area />").as(expectation)
+      end
+    end
+
+    it "should return the content of page part 'site_area' unless it does not exist" do
+      child = page(:child)
+      create_page_part "site_area", :content => "Hello World", :page_id => child.id 
+      child.should render("<r:site_area />").as("Hello World") 
+    end
+  end
+
+  describe "<r:site_subarea />" do
+    fixture = [
+      #  From page          Expectation
+      [:home,             ''],  
+      [:parent,           ''],  
+      [:child,            'child'],
+      [:grandchild,       'child'],
+      [:great_grandchild, 'child'],
+    ]
+    fixture.each do |page, expectation|
+      it "should return the second level parent page slug (from #{page})" do
+        page(page).should render("<r:site_subarea />").as(expectation)
+      end
+    end
+       
+    it "should return the content of page part 'site_subarea' unless it does not exist" do
+      child = page(:child)
+      create_page_part "site_subarea", :content => "Hello World", :page_id => child.id
+      child.should render("<r:site_subarea />").as("Hello World") 
+    end
+  end
+  
+  describe '<r:current_if_same_site_area />' do
+    fixture = [
+      #  From page    Found page path             Expectation
+      [:parent,     "/",                        ''],
+      [:parent,     "/parent",                  'current'],
+      [:parent,     "/parent/child",            'current'],
+      [:parent,     "/parent/child/grandchild", 'current'],
+
+      [:child,      "/",                        ''],
+      [:child,      "/parent",                  'current'],
+      [:child,      "/parent/child",            'current'],
+      [:child,      "/parent/child/grandchild", 'current'],
+
+      [:grandchild, "/",                        ''],
+      [:grandchild, "/parent",                  'current'],
+      [:grandchild, "/parent/child",            'current'],
+      [:grandchild, "/parent/child/grandchild", 'current'],
+
+      [:home,       "/parent/child",            ''],
+
+      [:first,      "/parent",                  ''],
+      [:first_child,"/parent/child/grandchild", ''],
+    ]
+    fixture.each do |page, path, expectation|
+      it "should return 'current' if the local page context is in the same site_area as the global page context (from #{page})" do
+        page(page).should render("<r:find url='#{path}'><r:current_if_same_site_area /></r:find>").as(expectation)
+      end
+    end
+
+  end
+  
+  describe "<r:if_same_site_area />" do
+    fixture = [
+      #  From page    Found page path             Expectation
+      [:parent,     "/",                        ''],
+      [:parent,     "/parent",                  'yes'],
+      [:parent,     "/parent/child",            'yes'],
+      [:parent,     "/parent/child/grandchild", 'yes'],
+
+      [:child,      "/",                        ''],
+      [:child,      "/parent",                  'yes'],
+      [:child,      "/parent/child",            'yes'],
+      [:child,      "/parent/child/grandchild", 'yes'],
+
+      [:grandchild, "/",                        ''],
+      [:grandchild, "/parent",                  'yes'],
+      [:grandchild, "/parent/child",            'yes'],
+      [:grandchild, "/parent/child/grandchild", 'yes'],
+
+      [:home,       "/parent/child",            ''],
+
+      [:first,      "/parent",                  ''],
+      [:first_child,"/parent/child/grandchild", ''],
+    ]
+    fixture.each do |page, path, expectation|
+      it "should render contained text if the local page context is in the same site_area as the global page context (from #{page})" do
+        page(page).should render("<r:find url='#{path}'><r:if_same_site_area>yes</r:if_same_site_area></r:find>").as(expectation)
+      end
+    end
+  end
+  
+  describe "<r:unless_same_site_area />" do
+    fixture = [
+      #  From page    Found page path             Expectation
+      [:parent,     "/",                        'no'],
+      [:parent,     "/parent",                  ''],
+      [:parent,     "/parent/child",            ''],
+      [:parent,     "/parent/child/grandchild", ''],
+
+      [:child,      "/",                        'no'],
+      [:child,      "/parent",                  ''],
+      [:child,      "/parent/child",            ''],
+      [:child,      "/parent/child/grandchild", ''],
+
+      [:grandchild, "/",                        'no'],
+      [:grandchild, "/parent",                  ''],
+      [:grandchild, "/parent/child",            ''],
+      [:grandchild, "/parent/child/grandchild", ''],
+
+      [:home,       "/parent/child",            'no'],
+
+      [:first,      "/parent",                  'no'],
+      [:first_child,"/parent/child/grandchild", 'no'],
+    ]
+    fixture.each do |page, path, expectation|
+      it "should render contained text unless the local page context is in the same site_area as the global page context (from #{page})" do
+        page(page).should render("<r:find url='#{path}'><r:unless_same_site_area>no</r:unless_same_site_area></r:find>").as(expectation)
+      end
+    end
+  end
+  
+  describe "<r:current_if_same_site_subarea />" do
+    fixture = [
+      #  From page    Found page path             Expectation
+      [:parent,     "/",                        ''],
+      [:parent,     "/parent",                  ''],
+      [:parent,     "/parent/child",            ''],
+      [:parent,     "/parent/child/grandchild", ''],
+
+      [:child,      "/",                        ''],
+      [:child,      "/parent",                  ''],
+      [:child,      "/parent/child",            'current'],
+      [:child,      "/parent/child/grandchild", 'current'],
+
+      [:grandchild, "/",                        ''],
+      [:grandchild, "/parent",                  ''],
+      [:grandchild, "/parent/child",            'current'],
+      [:grandchild, "/parent/child/grandchild", 'current'],
+
+      [:home,       "/parent/child",            ''],
+
+      [:first,      "/parent",                  ''],
+      [:first_child,"/parent/child/grandchild", ''],
+    ]
+    fixture.each do |page, path, expectation|
+      it "should return 'current' if the local page context is in the same site_subarea as the global page context (from #{page})" do
+        page(page).should render("<r:find url='#{path}'><r:current_if_same_site_subarea /></r:find>").as(expectation)
+      end
+    end
+  end
+  
+  describe "<r:current_if_same_site_subarea />" do
+    fixture = [
+      #  From page    Found page path             Expectation
+      [:parent,     "/",                        ''],
+      [:parent,     "/parent",                  ''],
+      [:parent,     "/parent/child",            ''],
+      [:parent,     "/parent/child/grandchild", ''],
+
+      [:child,      "/",                        ''],
+      [:child,      "/parent",                  ''],
+      [:child,      "/parent/child",            'current'],
+      [:child,      "/parent/child/grandchild", 'current'],
+
+      [:grandchild, "/",                        ''],
+      [:grandchild, "/parent",                  ''],
+      [:grandchild, "/parent/child",            'current'],
+      [:grandchild, "/parent/child/grandchild", 'current'],
+
+      [:home,       "/parent/child",            ''],
+
+      [:first,      "/parent",                  ''],
+      [:first_child,"/parent/child/grandchild", ''],
+    ]
+    fixture.each do |page, path, expectation|
+      it "should render 'current' if the local page context is in the same site_subarea as the global page context (from #{page})" do
+        page(page).should render("<r:find url='#{path}'><r:current_if_same_site_subarea /></r:find>").as(expectation)
+      end
+    end
+  end
+  
+  describe "<r:if_same_site_subarea />" do
+    fixture = [
+      #  From page    Found page path             Expectation
+      [:parent,     "/",                        ''],
+      [:parent,     "/parent",                  ''],
+      [:parent,     "/parent/child",            ''],
+      [:parent,     "/parent/child/grandchild", ''],
+
+      [:child,      "/",                        ''],
+      [:child,      "/parent",                  ''],
+      [:child,      "/parent/child",            'yes'],
+      [:child,      "/parent/child/grandchild", 'yes'],
+
+      [:grandchild, "/",                        ''],
+      [:grandchild, "/parent",                  ''],
+      [:grandchild, "/parent/child",            'yes'],
+      [:grandchild, "/parent/child/grandchild", 'yes'],
+
+      [:home,       "/parent/child",            ''],
+
+      [:first,      "/parent",                  ''],
+      [:first_child,"/parent/child/grandchild", ''],
+    ]
+    fixture.each do |page, path, expectation|
+      it "should render contained elements if the local page context is in the same site_subarea as the global page context (from #{page})" do
+        page(page).should render("<r:find url='#{path}'><r:if_same_site_subarea>yes</r:if_same_site_subarea></r:find>").as(expectation)
+      end
+    end
+  end
+  
+  describe "<r:unless_same_site_subarea />" do
+    fixture = [
+      #  From page    Found page path             Expectation
+      [:parent,     "/",                        'no'],
+      [:parent,     "/parent",                  'no'],
+      [:parent,     "/parent/child",            'no'],
+      [:parent,     "/parent/child/grandchild", 'no'],
+
+      [:child,      "/",                        'no'],
+      [:child,      "/parent",                  'no'],
+      [:child,      "/parent/child",            ''],
+      [:child,      "/parent/child/grandchild", ''],
+
+      [:grandchild, "/",                        'no'],
+      [:grandchild, "/parent",                  'no'],
+      [:grandchild, "/parent/child",            ''],
+      [:grandchild, "/parent/child/grandchild", ''],
+
+      [:home,       "/parent/child",            'no'],
+
+      [:first,      "/parent",                  'no'],
+      [:first_child,"/parent/child/grandchild", 'no'],
+    ]
+    fixture.each do |page, path, expectation|
+      it "should render contained elements unless the local page context is in the same site_subarea as the global page context (from #{page})" do
+        page(page).should render("<r:find url='#{path}'><r:unless_same_site_subarea>no</r:unless_same_site_subarea></r:find>").as(expectation)
+      end
+    end
+  end
+  
+  describe "<r:current_if_same_page />" do
+    fixture = [
+      #  From page    Found page path             Expectation
+      [:parent,     "/",                        ''],  
+      [:parent,     "/parent",                  'current'],    
+      [:parent,     "/parent/child",            ''],      
+      [:parent,     "/parent/child/grandchild", ''],  
+
+      [:child,      "/",                        ''],
+      [:child,      "/parent",                  ''],
+      [:child,      "/parent/child",            'current'],
+      [:child,      "/parent/child/grandchild", ''],
+
+      [:grandchild, "/",                        ''],
+      [:grandchild, "/parent",                  ''],
+      [:grandchild, "/parent/child",            ''],
+      [:grandchild, "/parent/child/grandchild", 'current'],
+
+      [:home,       "/",                        'current'],
+      [:home,       "/parent/child",            ''],
+
+      [:first,      "/parent",                  ''],
+      [:first_child,"/parent/child/grandchild", ''],
+    ] 
+    fixture.each do |page, path, expectation|
+      it "should return 'current' if the local page context is in the same as the global page context (from #{page})" do
+        page(page).should render("<r:find url='#{path}'><r:current_if_same_page /></r:find>").as(expectation)
+      end
+    end
+  end
+
+  describe "<r:link_with_current>" do
+    fixture = [
+    #  From page    href                          Link text           Expectation
+      [:parent,     "/",                          "Home",             '<a href="/">Home</a>'],  
+      [:parent,     "/parent",                    "Parent",           '<a href="/parent" class="current">Parent</a>'],    
+      [:parent,     "/parent/child",              "Child",            '<a href="/parent/child">Child</a>'],      
+      [:parent,     "/parent/child/grandchild",   "GrandChild",       '<a href="/parent/child/grandchild">GrandChild</a>'],  
+
+      [:child,      "/",                          "Home",             '<a href="/">Home</a>'],  
+      [:child,      "/parent",                    "Parent",           '<a href="/parent">Parent</a>'],    
+      [:child,      "/parent/child",              "Child",            '<a href="/parent/child" class="current">Child</a>'],      
+      [:child,      "/parent/child/grandchild",   "GrandChild",       '<a href="/parent/child/grandchild">GrandChild</a>'],  
+
+      [:grandchild, "/",                          "Home",             '<a href="/">Home</a>'],  
+      [:grandchild, "/parent",                    "Parent",           '<a href="/parent">Parent</a>'],    
+      [:grandchild, "/parent/child",              "Child",            '<a href="/parent/child">Child</a>'],      
+      [:grandchild, "/parent/child/grandchild",   "GrandChild",       '<a href="/parent/child/grandchild" class="current">GrandChild</a>'],  
+
+      [:home,       "/",                          "Home",             '<a href="/" class="current">Home</a>'],  
+      [:home,       "/first",                     "First",             '<a href="/first">First</a>'],    
+
+      [:first,      "/parent",                    "Parent",           '<a href="/parent">Parent</a>'],
+      [:first_child,"/parent/child/grandchild",   "GrandChild",       '<a href="/parent/child/grandchild">GrandChild</a>'],        
+    ]
+    fixture.each do |page, path, link_text, expectation|
+      it "should render a simple link and add class='current' if it's a link to the current page (from #{page})" do
+        page(page).should render("<r:link_with_current href='#{path}'>#{link_text}</r:link_with_current>").as(expectation)
+      end    
+    end 
+
+    it "should render a simple link to the current page and add class='current' if attribute 'href' is not provided" do
+      page(:parent).should render("<r:link_with_current >Parent</r:link_with_current>").as('<a href="/parent/" class="current">Parent</a>')
+    end    
+  end
+end

data/spec/spec.opts

@@ -0,0 +1,6 @@
+--colour
+--format
+progress
+--loadby
+mtime
+--reverse

data/spec/spec_helper.rb

@@ -0,0 +1,44 @@
+unless defined? RADIANT_ROOT
+  ENV["RAILS_ENV"] = "test"
+  case
+  when ENV["RADIANT_ENV_FILE"]
+    require ENV["RADIANT_ENV_FILE"]
+  when File.dirname(__FILE__) =~ %r{vendor/radiant/vendor/extensions}
+    require "#{File.expand_path(File.dirname(__FILE__) + "/../../../../../../")}/config/environment"
+  else
+    require "#{File.expand_path(File.dirname(__FILE__) + "/../../../../")}/config/environment"
+  end
+end
+require "#{RADIANT_ROOT}/spec/spec_helper"
+
+Dataset::Resolver.default << (File.dirname(__FILE__) + "/datasets")
+
+if File.directory?(File.dirname(__FILE__) + "/matchers")
+  Dir[File.dirname(__FILE__) + "/matchers/*.rb"].each {|file| require file }
+end
+
+include ApplicationHelper
+
+module RadiantSpecHelpers
+  def page(symbol = nil)
+    @page = pages(symbol)
+  end
+end
+
+Spec::Runner.configure do |config|
+  config.use_transactional_fixtures = true
+  # config.use_instantiated_fixtures  = false
+  config.fixture_path = RAILS_ROOT + '/vendor/extensions/trike_tags/spec/fixtures/'
+  config.include RadiantSpecHelpers
+  # You can declare fixtures for each behaviour like this:
+  #   describe "...." do
+  #     fixtures :table_a, :table_b
+  #
+  # Alternatively, if you prefer to declare them only once, you can
+  # do so here, like so ...
+  #
+  #   config.global_fixtures = :table_a, :table_b
+  #
+  # If you declare global fixtures, be aware that they will be declared
+  # for all of your examples, even those that don't use them.
+end

metadata

@@ -0,0 +1,80 @@
+--- !ruby/object:Gem::Specification 
+name: radiant-site_area_tags-extension
+version: !ruby/object:Gem::Version 
+  hash: 23
+  prerelease: false
+  segments: 
+  - 1
+  - 0
+  - 0
+  version: 1.0.0
+platform: ruby
+authors: 
+- Benny Degezelle
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-04-01 00:00:00 +02:00
+default_executable: 
+dependencies: []
+
+description: Makes Radiant better by adding site_area_tags!
+email: 
+- benny@gorilla-webdesign.be
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- README
+- Rakefile
+- app/models/site_area_tags.rb
+- lib/radiant-site_area_tags-extension.rb
+- lib/radiant-site_area_tags-extension/version.rb
+- lib/tasks/site_area_tags_extension_tasks.rake
+- radiant-site_area_tags-extension.gemspec
+- site_area_tags_extension.rb
+- spec/models/site_area_tags_spec.rb
+- spec/spec.opts
+- spec/spec_helper.rb
+has_rdoc: true
+homepage: http://github.com/jomz/radiant-site_area_tags-extension
+licenses: []
+
+post_install_message: "\n  Add this to your radiant project with:\n    config.gem 'radiant-site_area_tags-extension', :version => '1.0.0'\n  "
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.7
+signing_key: 
+specification_version: 3
+summary: Site Area Tags for Radiant CMS
+test_files: 
+- spec/models/site_area_tags_spec.rb
+- spec/spec.opts
+- spec/spec_helper.rb