nesta 0.11.1 → 0.12.0

data/test/support/test_configuration.rb

@@ -0,0 +1,19 @@
+module TestConfiguration
+  include TemporaryFiles
+
+  def stub_config(config, &block)
+    Nesta::Config.stub(:yaml_exists?, true) do
+      Nesta::Config.stub(:yaml_conf, config) do
+        yield
+      end
+    end
+  end
+
+  def temp_content
+    { 'content' => temp_path('content') }
+  end
+
+  def with_temp_content_directory(&block)
+    stub_config(temp_content) { yield }
+  end
+end

data/test/test_helper.rb

@@ -0,0 +1,26 @@
+require 'sinatra'
+require 'minitest/autorun'
+
+require 'minitest/reporters'
+
+reporter_setting = ENV.fetch('REPORTER', 'progress')
+camel_case = reporter_setting.split(/_/).map { |word| word.capitalize }.join('')
+Minitest::Reporters.use! Minitest::Reporters.const_get("#{camel_case}Reporter").new
+
+require File.expand_path('../lib/nesta/env', File.dirname(__FILE__))
+require File.expand_path('../lib/nesta/app', File.dirname(__FILE__))
+
+require_relative 'support/model_factory'
+require_relative 'support/temporary_files'
+require_relative 'support/test_configuration'
+
+Nesta::App.environment = 'test'
+
+class Minitest::Test
+  def with_app_root(path, &block)
+    original, Nesta::App.root = Nesta::App.root, path
+    yield
+  ensure
+    Nesta::App.root = original
+  end
+end

data/test/unit/commands_test.rb

@@ -0,0 +1,23 @@
+require 'test_helper'
+require_relative '../../lib/nesta/commands'
+
+class TestCommand
+  include Nesta::Commands::Command
+end
+
+describe 'Nesta::Commands::Command' do
+  describe '#run_process' do
+    it 'catches errors when running external processes' do
+      TestCommand.new.run_process('ls / >/dev/null')
+      begin
+        stderr, $stderr = $stderr, File.open('/dev/null', 'w')
+        assert_raises(SystemExit) do
+          TestCommand.new.run_process('ls no-such-file 2>/dev/null')
+        end
+      ensure
+        $stderr.close
+        $stderr = stderr
+      end
+    end
+  end
+end

data/test/unit/config_test.rb

@@ -0,0 +1,138 @@
+require 'test_helper'
+
+describe Nesta::Config do
+  include TestConfiguration
+
+  after do
+    ENV.keys.each { |variable| ENV.delete(variable) if variable =~ /NESTA_/ }
+  end
+
+  it 'returns default value for "Read more"' do
+    assert_equal 'Continue reading', Nesta::Config.read_more
+  end
+
+  it 'returns nil for author when not defined' do
+    assert_nil Nesta::Config.author
+  end
+
+  describe 'when settings defined in ENV' do
+    before do
+      @title = 'Title from ENV'
+      ENV['NESTA_TITLE'] = @title
+    end
+
+    it 'falls back to config.yml' do
+      stub_config('subtitle' => 'Subtitle in YAML file') do
+        assert_equal 'Subtitle in YAML file', Nesta::Config.subtitle
+      end
+    end
+
+    it 'overrides config.yml' do
+      stub_config('title' => 'Title in YAML file') do
+        assert_equal @title, Nesta::Config.title
+      end
+    end
+
+    it 'knows how to cope with boolean values' do
+      Nesta::Config.settings << 'a_boolean'
+      begin
+        ENV['NESTA_A_BOOLEAN'] = 'true'
+        assert_equal true, Nesta::Config.a_boolean, 'should be true'
+        ENV['NESTA_A_BOOLEAN'] = 'false'
+        assert_equal false, Nesta::Config.a_boolean, 'should be false'
+      ensure
+        Nesta::Config.settings.pop
+        ENV.delete('NESTA_A_BOOLEAN')
+      end
+    end
+
+    it 'should return configured value for "Read more"' do
+      ENV['NESTA_READ_MORE'] = 'Read on'
+      begin
+        assert_equal 'Read on', Nesta::Config.read_more
+      ensure
+        ENV.delete('NESTA_READ_MORE')
+      end
+    end
+
+    it 'sets author hash from ENV' do
+      name = 'Name from ENV'
+      uri = 'URI from ENV'
+      ENV['NESTA_AUTHOR__NAME'] = name
+      ENV['NESTA_AUTHOR__URI'] = uri
+      assert_equal name, Nesta::Config.author['name']
+      assert_equal uri, Nesta::Config.author['uri']
+      assert Nesta::Config.author['email'].nil?, 'should be nil'
+    end
+  end
+
+  describe 'when settings only defined in config.yml' do
+    before do
+      @title = 'Title in YAML file'
+    end
+
+    it 'reads configuration from YAML' do
+      stub_config('subtitle' => @title) do
+        assert_equal @title, Nesta::Config.subtitle
+      end
+    end
+
+    it 'sets author hash from YAML' do
+      name = 'Name from YAML'
+      uri = 'URI from YAML'
+      stub_config('author' => { 'name' => name, 'uri' => uri }) do
+        assert_equal name, Nesta::Config.author['name']
+        assert_equal uri, Nesta::Config.author['uri']
+        assert Nesta::Config.author['email'].nil?, 'should be nil'
+      end
+    end
+
+    it 'overrides top level settings with environment specific settings' do
+      config = {
+        'content' => 'general/path',
+        'test' => { 'content' => 'rack_env_specific/path' }
+      }
+      stub_config(config) do
+        assert_equal 'rack_env_specific/path', Nesta::Config.content
+      end
+    end
+  end
+
+  describe 'Nesta::Config.fetch' do
+    it 'retrieves settings from environment' do
+      ENV['NESTA_MY_SETTING'] = 'value in ENV'
+      begin
+        assert_equal 'value in ENV', Nesta::Config.fetch('my_setting')
+        assert_equal 'value in ENV', Nesta::Config.fetch(:my_setting)
+      ensure
+        ENV.delete('NESTA_MY_SETTING')
+      end
+    end
+
+    it 'retrieves settings from YAML' do
+      stub_config('my_setting' => 'value in YAML') do
+        assert_equal 'value in YAML', Nesta::Config.fetch('my_setting')
+        assert_equal 'value in YAML', Nesta::Config.fetch(:my_setting)
+      end
+    end
+
+    it "throws NotDefined if a setting isn't defined" do
+      assert_raises(Nesta::Config::NotDefined) do
+        Nesta::Config.fetch('no such setting')
+      end
+    end
+
+    it 'allows default values to be set' do
+      assert_equal 'default', Nesta::Config.fetch('no such setting', 'default')
+    end
+
+    it 'copes with non-truthy boolean values' do
+      ENV['NESTA_SETTING'] = 'false'
+      begin
+        assert_equal false, Nesta::Config.fetch('setting')
+      ensure
+        ENV.delete('NESTA_SETTING')
+      end
+    end
+  end
+end

data/test/unit/file_model_test.rb

@@ -0,0 +1,71 @@
+require 'test_helper'
+
+describe Nesta::FileModel do
+  include ModelFactory
+  include TestConfiguration
+
+  after do
+    Nesta::FileModel.purge_cache
+    remove_temp_directory
+  end
+
+  it 'can find all files of this type' do
+    with_temp_content_directory do
+      model = create(:file_model)
+      assert_equal [model], Nesta::FileModel.find_all
+    end
+  end
+
+  describe '.find_file_for_path' do
+    it 'returns filename for path' do
+      with_temp_content_directory do
+        model = create(:file_model)
+        filename = Nesta::FileModel.find_file_for_path(model.path)
+        assert_equal filename, model.filename
+      end
+    end
+
+    it 'returns nil if file not found' do
+      with_temp_content_directory do
+        assert_nil Nesta::FileModel.find_file_for_path('foobar')
+      end
+    end
+  end
+
+  it 'can parse metadata at top of a file' do
+    with_temp_content_directory do
+      model = create(:file_model)
+      metadata = model.parse_metadata('My key: some value')
+      assert_equal 'some value', metadata['my key']
+    end
+  end
+
+  it "doesn't break loading pages with badly formatted metadata" do
+    with_temp_content_directory do
+      dodgy_metadata = "Key: value\nKey without value\nAnother key: value"
+      page = create(:page) do |path|
+        text = File.read(path)
+        File.open(path, 'w') do |file|
+          file.puts(dodgy_metadata)
+          file.write(text)
+        end
+      end
+      Nesta::Page.find_by_path(page.path)
+    end
+  end
+
+  it 'invalidates cached models when files are modified' do
+    with_temp_content_directory do
+      create(:file_model, path: 'a-page', metadata: { 'Version' => '1' })
+      now = Time.now
+      File.stub(:mtime, now - 1) do
+        Nesta::FileModel.load('a-page')
+      end
+      create(:file_model, path: 'a-page', metadata: { 'Version' => '2' })
+      model = File.stub(:mtime, now) do
+        Nesta::FileModel.load('a-page')
+      end
+      assert_equal '2', model.metadata('version')
+    end
+  end
+end

data/test/unit/menu_test.rb

@@ -0,0 +1,82 @@
+require 'test_helper'
+
+describe Nesta::Menu do
+  include ModelFactory
+  include TestConfiguration
+
+  def with_page(&block)
+    with_temp_content_directory do
+      page = create(:page)
+      create_menu(page.path)
+      yield(page)
+    end
+  end
+
+  def with_hierarchy_of_pages(&block)
+    with_temp_content_directory do
+      pages = (1..6).map { |i| create(:page) }
+      text = <<-EOF
+#{pages[0].path}
+  #{pages[1].path}
+    #{pages[2].path}
+    #{pages[3].path}
+    "no-such-page"
+"another-missing-page"
+#{pages[4].path}
+  #{pages[5].path}
+      EOF
+      create_menu(text)
+      yield(pages)
+    end
+  end
+
+  after do
+    remove_temp_directory
+    Nesta::FileModel.purge_cache
+  end
+
+  it 'retrieves Page objects for the menu' do
+    with_page do |page|
+      assert_equal [page], Nesta::Menu.full_menu
+      assert_equal [page], Nesta::Menu.for_path('/')
+    end
+  end
+
+  it "filters pages that don't exist out of the menu" do
+    with_temp_content_directory do
+      page = create(:page)
+      text = ['no-such-page', page.path].join("\n")
+      create_menu(text)
+      assert_equal [page], Nesta::Menu.top_level
+    end
+  end
+
+  describe 'nested sub menus' do
+    it 'returns top level menu items' do
+      with_hierarchy_of_pages do |pages|
+        assert_equal [pages[0], pages[4]], Nesta::Menu.top_level
+      end
+    end
+
+    it 'returns full tree of menu items' do
+      with_hierarchy_of_pages do |pages|
+        page1, page2, page3, page4, page5, page6 = pages
+        expected = [page1, [page2, [page3, page4]], page5, [page6]]
+        assert_equal expected, Nesta::Menu.full_menu
+      end
+    end
+
+    it 'returns part of the tree of menu items' do
+      with_hierarchy_of_pages do |pages|
+        page1, page2, page3, page4, page5, page6 = pages
+        assert_equal [page2, [page3, page4]], Nesta::Menu.for_path(page2.path)
+      end
+    end
+
+    it 'deems menu for path not in menu to be nil' do
+      with_hierarchy_of_pages do
+        assert_nil Nesta::Menu.for_path('wibble')
+      end
+    end
+  end
+end

data/test/unit/page_test.rb

@@ -0,0 +1,571 @@
+require 'test_helper'
+
+describe Nesta::Page do
+  include ModelFactory
+  include TestConfiguration
+
+  after do
+    Nesta::FileModel.purge_cache
+    remove_temp_directory
+  end
+
+  it 'raises error if instantiated for non existant file' do
+    with_temp_content_directory do
+      assert_raises(Sinatra::NotFound) do
+        Nesta::Page.new('no-such-file')
+      end
+    end
+  end
+
+  describe '.find_by_path' do
+    it 'finds model instances by path' do
+      with_temp_content_directory do
+        page = create(:page)
+        assert_equal page.heading, Nesta::Page.find_by_path(page.path).heading
+      end
+    end
+
+    it 'finds model for index page by path' do
+      with_temp_content_directory do
+        page = create(:page, path: 'path/index')
+        assert_equal page.heading, Nesta::Page.find_by_path('path').heading
+      end
+    end
+
+    it 'finds model for home page when path is /' do
+      with_temp_content_directory do
+        create(:page, heading: 'Home', path: 'index')
+        assert_equal 'Home', Nesta::Page.find_by_path('/').title
+      end
+    end
+
+    it 'returns nil if page not found' do
+      with_temp_content_directory do
+        assert_nil Nesta::Page.find_by_path('no-such-page')
+      end
+    end
+
+    it 'returns nil for draft pages when running in production'do
+      with_temp_content_directory do
+        draft = create(:page, metadata: { 'flags' => 'draft' })
+        assert Nesta::Page.find_by_path(draft.path), 'should find draft'
+        Nesta::App.stub(:production?, true) do
+          assert_nil Nesta::Page.find_by_path(draft.path)
+        end
+      end
+    end
+  end
+
+  describe '.find_articles 'do
+    it "doesn't return articles with a published date in the future" do
+      with_temp_content_directory do
+        future_date = (Time.now + 172800).strftime('%d %B %Y')
+        article = create(:article, metadata: { 'date' => future_date })
+        assert_nil Nesta::Page.find_articles.detect { |a| a == article }
+      end
+    end
+
+    it "doesn't return pages without a date" do
+      with_temp_content_directory do
+        create(:category)
+        create(:article)
+        articles = Nesta::Page.find_articles
+        assert_equal 1, articles.size
+        articles.each { |page| fail 'not an article' if page.date.nil? }
+      end
+    end
+
+    it 'returns articles in reverse chronological order' do
+      with_temp_content_directory do
+        create(:article, metadata: { 'date' => '30 December 2008' })
+        create(:article, metadata: { 'date' => '31 December 2008' })
+        article1, article2 = Nesta::Page.find_articles[0..1]
+        assert article1.date > article2.date, 'not reverse chronological order'
+      end
+    end
+  end
+
+  describe '#title' do
+    it 'returns page heading by default' do
+      with_temp_content_directory do
+        page = create(:page, heading: 'Heading')
+        assert_equal page.heading, Nesta::Page.find_by_path(page.path).title
+      end
+    end
+
+    it 'overrides heading with title set in metadata' do
+      with_temp_content_directory do
+        page = create(:page, metadata: { 'title' => 'Specific title' })
+        assert_equal 'Specific title', Nesta::Page.find_by_path(page.path).title
+      end
+    end
+
+    it 'defaults to site title for home page' do
+      stub_config(temp_content.merge('title' => 'Site title')) do
+        create(:page, heading: nil, path: 'index')
+        assert_equal 'Site title', Nesta::Page.find_by_path('/').title
+      end
+    end
+  end
+
+  describe '#heading' do
+    it 'raises error if heading not set' do
+      with_temp_content_directory do
+        assert_raises Nesta::HeadingNotSet do
+          create(:page, heading: nil).heading
+        end
+      end
+    end
+
+    it 'parses Markdown pages returning contents of first # heading' do
+      with_temp_content_directory do
+        page = create(:page) do |path|
+          file = File.open(path, 'w')
+          file.write('# Hello Markdown')
+          file.close
+        end
+        assert_equal 'Hello Markdown', page.heading
+      end
+    end
+
+    it 'parses Textile pages returning contents of first h1. heading' do
+      with_temp_content_directory do
+        page = create(:page, ext: 'textile') do |path|
+          file = File.open(path, 'w')
+          file.write('h1. Hello Textile')
+          file.close
+        end
+        assert_equal 'Hello Textile', page.heading
+      end
+    end
+
+    it 'parases Haml pages returning contents of first %h1 tag' do
+      with_temp_content_directory do
+        page = create(:page, ext: 'haml') do |path|
+          file = File.open(path, 'w')
+          file.write('%h1 Hello Haml')
+          file.close
+        end
+        assert_equal 'Hello Haml', page.heading
+      end
+    end
+
+    it 'ignores subsequent h1 tags' do
+      with_temp_content_directory do
+        page = create(:page, content: '# Second heading')
+        fail 'wrong h1 tag' if page.heading == 'Second heading'
+      end
+    end
+
+    it 'ignores trailing # characters in Markdown headings' do
+      with_temp_content_directory do
+        page = create(:page, heading: 'With trailing #')
+        assert_equal 'With trailing', page.heading
+      end
+    end
+  end
+
+  describe '#abspath' do
+    it 'returns / for home page' do
+      with_temp_content_directory do
+        create(:page, path: 'index')
+        assert_equal '/', Nesta::Page.find_by_path('index').abspath
+      end
+    end
+  end
+
+  describe '#permalink' do
+    it 'returns basename of filename' do
+      with_temp_content_directory do
+        assert_equal 'page', create(:page, path: 'path/to/page').permalink
+      end
+    end
+
+    it 'returns empty string for home page' do
+      with_temp_content_directory do
+        home = create(:page, path: 'index')
+        assert_equal '', Nesta::Page.find_by_path(home.path).permalink
+      end
+    end
+
+    it 'removes /index from permalink of index pages' do
+      with_temp_content_directory do
+        index = create(:page, path: 'parent/child/index')
+        assert_equal 'child', index.permalink
+      end
+    end
+  end
+
+  describe '#parent' do
+    it 'finds the parent by inspecting the path' do
+      with_temp_content_directory do
+        parent = create(:page, path: 'parent')
+        child = create(:page, path: 'parent/child')
+        assert_equal parent, child.parent
+      end
+    end
+
+    it 'returns nil for pages at top level' do
+      with_temp_content_directory do
+        assert_nil create(:page, path: 'top-level').parent
+      end
+    end
+
+    it 'finds parents that are index pages' do
+      with_temp_content_directory do
+        home = create(:page, path: 'index')
+        child = create(:page, path: 'parent')
+        assert_equal home, child.parent
+      end
+    end
+
+    it "returns grandparent if parent doesn't exist" do
+      with_temp_content_directory do
+        grandparent = create(:page, path: 'grandparent')
+        child = create(:page, path: 'grandparent/parent/child')
+        assert_equal grandparent, child.parent
+      end
+    end
+
+    it 'recognises that home page can be returned as a grandparent' do
+      with_temp_content_directory do
+        grandparent = create(:page, path: 'index')
+        child = create(:page, path: 'parent/child')
+        assert_equal grandparent, child.parent
+      end
+    end
+
+    it 'returns nil if page has no parent' do
+      with_temp_content_directory do
+        assert_nil create(:page, path: 'index').parent
+      end
+    end
+
+    it 'finds parent of an index page' do
+      with_temp_content_directory do
+        parent = create(:page, path: 'parent')
+        index = create(:page, path: 'parent/child/index')
+        assert_equal parent, index.parent
+      end
+    end
+  end
+
+  describe '#priority' do
+    it 'defaults to 0 for pages in category' do
+      with_temp_content_directory do
+        page = create(:page, metadata: { 'categories' => 'the-category' })
+        assert_equal 0, page.priority('the-category')
+        assert_nil page.priority('another-category')
+      end
+    end
+
+    it 'parses metadata to determine priority in each category' do
+      with_temp_content_directory do
+        page = create(:page, metadata: {
+          'categories' => ' category-page:1, another-page , and-another :-1 '
+        })
+        assert_equal 1, page.priority('category-page')
+        assert_equal 0, page.priority('another-page')
+        assert_equal -1, page.priority('and-another')
+      end
+    end
+  end
+
+  describe '#pages' do
+    it 'returns pages but not articles within this category' do
+      with_temp_content_directory do
+        category = create(:category)
+        metadata = { 'categories' => category.path }
+        page1 = create(:category, metadata: metadata)
+        page2 = create(:category, metadata: metadata)
+        create(:article, metadata: metadata)
+        assert_equal [page1, page2], category.pages
+      end
+    end
+
+    it 'sorts pages within a category by priority' do
+      with_temp_content_directory do
+        category = create(:category)
+        create(:category, metadata: { 'categories' => category.path })
+        page = create(:category, metadata: {
+          'categories' => "#{category.path}:1"
+        })
+        assert_equal 0, category.pages.index(page)
+      end
+    end
+
+    it 'orders pages within a category by heading if priority not set' do
+      with_temp_content_directory do
+        category = create(:category)
+        metadata = { 'categories' => category.path }
+        last = create(:category, heading: 'B', metadata: metadata)
+        first = create(:category, heading: 'A', metadata: metadata)
+        assert_equal [first, last], category.pages
+      end
+    end
+
+    it 'filters out draft pages when running in production' do
+      with_temp_content_directory do
+        category = create(:category)
+        create(:page, metadata: {
+          'categories' => category.path,
+          'flags' => 'draft'
+        })
+        fail 'should include draft pages' if category.pages.empty?
+        Nesta::App.stub(:production?, true) do
+          assert category.pages.empty?, 'should filter out draft pages'
+        end
+      end
+    end
+  end
+
+  describe '#articles' do
+    it "returns just the articles that are in this page's category" do
+      with_temp_content_directory do
+        category1 = create(:category)
+        in_category1 = { 'categories' => category1.path }
+        category2 = create(:category, metadata: in_category1)
+        in_category2 = { 'categories' => category2.path }
+
+        article1 = create(:article, metadata: in_category1)
+        create(:article, metadata: in_category2)
+
+        assert_equal [article1], category1.articles
+      end
+    end
+
+    it 'returns articles in reverse chronological order' do
+      with_temp_content_directory do
+        category = create(:category)
+        create(:article, metadata: {
+          'date' => '30 December 2008',
+          'categories' => category.path
+        })
+        latest = create(:article, metadata: {
+          'date' => '31 December 2008',
+          'categories' => category.path
+        })
+        assert_equal latest, category.articles.first
+      end
+    end
+  end
+
+  describe '#categories' do
+    it "returns a page's categories" do
+      with_temp_content_directory do
+        category1 = create(:category, path: 'path/to/cat1')
+        category2 = create(:category, path: 'path/to/cat2')
+        article = create(:article, metadata: {
+          'categories' => 'path/to/cat1, path/to/cat2'
+        })
+        assert_equal [category1, category2], article.categories
+      end
+    end
+
+    it 'only returns categories that exist' do
+      with_temp_content_directory do
+        article = create(:article, metadata: { 'categories' => 'no-such-page' })
+        assert_empty article.categories
+      end
+    end
+  end
+
+  describe '#to_html' do
+    it 'produces no output if page has no content' do
+      with_temp_content_directory do
+        page = create(:page) do |path|
+          file = File.open(path, 'w')
+          file.close
+        end
+        assert_match /^\s*$/, Nesta::Page.find_by_path(page.path).to_html
+      end
+    end
+
+    it 'converts page content to HTML' do
+      with_temp_content_directory do
+        assert_match %r{<h1>Hello</h1>}, create(:page, heading: 'Hello').to_html
+      end
+    end
+
+    it "doesn't include leading metadata in HTML" do
+      with_temp_content_directory do
+        page = create(:page, metadata: { 'key' => 'value' })
+        fail 'HTML contains metadata' if page.to_html =~ /(key|value)/
+      end
+    end
+  end
+
+  describe '#summary' do
+    it 'returns value set in metadata wrapped in p tags' do
+      with_temp_content_directory do
+        page = create(:page, metadata: { 'Summary' => 'Summary paragraph' })
+        assert_equal "<p>Summary paragraph</p>\n", page.summary
+      end
+    end
+
+    it 'treats double newline characters as paragraph breaks' do
+      with_temp_content_directory do
+        page = create(:page, metadata: { 'Summary' => 'Line 1\n\nLine 2' })
+        assert_includes page.summary, '<p>Line 1</p>'
+        assert_includes page.summary, '<p>Line 2</p>'
+      end
+    end
+  end
+
+  describe '#body' do
+    it "doesn't include page heading" do
+      with_temp_content_directory do
+        page = create(:page, heading: 'Heading')
+        fail 'body contains heading' if page.body_markup =~ /#{page.heading}/
+      end
+    end
+  end
+
+  describe '#metadata' do
+    it 'return value of any key set in metadata at top of page' do
+      with_temp_content_directory do
+        page = create(:page, metadata: { 'Any key' => 'Any string' })
+        assert_equal 'Any string', page.metadata('Any key')
+      end
+    end
+  end
+
+  describe '#layout' do
+    it 'defaults to :layout' do
+      with_temp_content_directory do
+        assert_equal :layout, create(:page).layout
+      end
+    end
+
+    it 'returns value set in metadata' do
+      with_temp_content_directory do
+        page = create(:page, metadata: { 'Layout' => 'my_layout' })
+        assert_equal :my_layout, page.layout
+      end
+    end
+  end
+
+  describe '#template' do
+    it 'defaults to :page' do
+      with_temp_content_directory do
+        assert_equal :page, create(:page).template
+      end
+    end
+
+    it 'returns value set in metadata' do
+      with_temp_content_directory do
+        page = create(:page, metadata: { 'Template' => 'my_template' })
+        assert_equal :my_template, page.template
+      end
+    end
+  end
+
+  describe '#link_text' do
+    it 'raises error if neither heading nor link text set' do
+      with_temp_content_directory do
+        assert_raises Nesta::LinkTextNotSet do
+          create(:page, heading: nil).link_text
+        end
+      end
+    end
+
+    it 'defaults to page heading' do
+      with_temp_content_directory do
+        page = create(:page)
+        assert_equal page.heading, page.link_text
+      end
+    end
+
+    it 'returns value set in metadata' do
+      with_temp_content_directory do
+        page = create(:page, metadata: { 'link text' => 'Hello' })
+        assert_equal 'Hello', page.link_text
+      end
+    end
+  end
+
+  describe '#read_more' do
+    it 'has sensible default' do
+      with_temp_content_directory do
+        assert_equal 'Continue reading', create(:page).read_more
+      end
+    end
+
+    it 'returns value set in metadata' do
+      with_temp_content_directory do
+        page = create(:page, metadata: { 'Read more' => 'Click here' })
+        assert_equal 'Click here', page.read_more
+      end
+    end
+  end
+
+  describe '#description' do
+    it 'returns nil by default' do
+      with_temp_content_directory { assert_nil create(:page).description }
+    end
+
+    it 'returns value set in metadata' do
+      with_temp_content_directory do
+        page = create(:page, metadata: { 'description' => 'A page' })
+        assert_equal 'A page', page.description
+      end
+    end
+  end
+
+  describe '#keywords' do
+    it 'returns nil by default' do
+      with_temp_content_directory { assert_nil create(:page).keywords }
+    end
+
+    it 'returns value set in metadata' do
+      with_temp_content_directory do
+        page = create(:page, metadata: { 'keywords' => 'good, content' })
+        assert_equal 'good, content', page.keywords
+      end
+    end
+  end
+
+  describe '#date' do
+    it 'returns date article was published' do
+      with_temp_content_directory do
+        article = create(:article, metadata: { 'date' => 'November 18 2015' })
+        assert_equal '18 November 2015', article.date.strftime('%d %B %Y')
+      end
+    end
+  end
+
+  describe '#flagged_as?' do
+    it 'returns true if flags metadata contains the string' do
+      with_temp_content_directory do
+        page = create(:page, metadata: { 'flags' => 'A flag, popular' })
+        assert page.flagged_as?('popular'), 'should be flagged popular'
+        assert page.flagged_as?('A flag'), 'should be flagged with "A flag"'
+        fail 'not flagged as green' if page.flagged_as?('green')
+      end
+    end
+  end
+
+  describe '#draft?' do
+    it 'returns true if page flagged as draft' do
+      with_temp_content_directory do
+        page = create(:page, metadata: { 'flags' => 'draft' })
+        assert page.draft?
+        fail 'not a draft' if create(:page).draft?
+      end
+    end
+  end
+
+  describe '#last_modified' do
+    it 'reads last modified timestamp from disk' do
+      with_temp_content_directory do
+        page = create(:page)
+        file_stat = Minitest::Mock.new
+        file_stat.expect(:mtime, Time.parse('3 January 2009'))
+        File.stub(:stat, file_stat) do
+          assert_equal '03 Jan 2009', page.last_modified.strftime('%d %b %Y')
+        end
+        file_stat.verify
+      end
+    end
+  end
+end