wagn 1.13.0 → 1.14.0.pre1

data/mod/standard/set/all/history.rb

@@ -1,107 +0,0 @@
-
-format :html do
-
-  view :history do |args|
-    load_revisions
-    if @revision
-      frame args.merge( :content=>true, :subheader=>_render_revision_subheader ) do
-        _render_diff
-      end
-    end
-  end
-
-  view :diff do |args|
-    load_revisions
-    if @show_diff and @previous_revision
-      diff @previous_revision.content, @revision.content
-    else
-      @revision.content
-    end
-  end
-  
-  view :revision_subheader do |args|
-    %{
-      <div class="revision-header">
-        <span class="revision-title">#{ @revision.title }</span>
-        posted by #{ link_to_page @revision.creator.name }
-        on #{ format_date(@revision.created_at) } #{
-        if !card.drafts.empty?
-          %{<div class="autosave-alert">
-            This card has an #{ autosave_revision }
-          </div>}
-        end}#{
-        if @show_diff and @revision_number > 1  #ENGLISH
-          %{<div class="revision-diff-header">
-            <small>
-              Showing changes from revision ##{ @revision_number - 1 }:
-              <ins class="diffins">Added</ins> | <del class="diffmod">Deleted</del>
-            </small>
-          </div>}
-        end}
-      </div>
-      <div class="revision-navigation">#{ revision_menu }</div>
-    }
-  end
-  
-  def load_revisions
-    unless @revision_number
-      @revision_number = (params[:rev] || (card.revisions.count - card.drafts.length)).to_i
-      @revision = card.revisions[@revision_number - 1]
-      @previous_revision = @revision ? card.previous_revision( @revision.id ) : nil
-      @show_diff = (params[:mode] != 'false')
-    end
-  end
-
-  def revision_link text, revision, name, accesskey='', mode=nil
-    link_to text, path(:view=>:history, :rev=>revision, :mode=>(mode || params[:mode] || true) ),
-      :class=>"slotter", :remote=>true, :rel=>'nofollow'
-  end
-
-  def rollback to_rev=nil
-    to_rev ||= @revision_number
-    if card.ok?(:update) && !(card.current_revision==@revision)
-      link_to 'Save as current', path(:action=>:rollback, :rev=>to_rev),
-        :class=>'slotter', :remote=>true
-    end
-  end
-
-  def revision_menu
-    revision_menu_items.flatten.map do |item|
-      "<span>#{item}</span>"
-    end.join('')
-  end
-
-  def revision_menu_items
-    items = [back_for_revision, forward, see_or_hide_changes_for_revision]
-    items << rollback unless card.recaptcha_on?
-    items
-  end
-
-  def forward
-    if @revision_number < card.revisions.count
-      revision_link('Newer', @revision_number +1, 'to_next_revision', 'F' ) +
-        raw(" <small>(#{card.revisions.count - @revision_number})</small>")
-    else
-      'Newer <small>(0)</small>'
-    end
-  end
-
-  def back_for_revision
-    if @revision_number > 1
-      revision_link('Older',@revision_number - 1, 'to_previous_revision') +
-        raw("<small>(#{@revision_number - 1})</small>")
-    else
-      'Older <small>(0)</small>'
-    end
-  end
-
-  def see_or_hide_changes_for_revision
-    revision_link(@show_diff ? 'Hide changes' : 'Show changes',
-      @revision_number, 'see_changes', 'C', (@show_diff ? 'false' : 'true'))
-  end
-
-  def autosave_revision
-     revision_link("Autosaved Draft", card.revisions.count, 'to autosave')
-  end
-
-end

data/mod/standard/set/right/add_help.rb

@@ -1,3 +0,0 @@
-format :html do
-  include Structure::HtmlFormat
-end

data/mod/standard/set/right/default.rb

@@ -1,3 +0,0 @@
-format :html do
-  include Structure::HtmlFormat
-end

data/mod/standard/set/right/help.rb

@@ -1,3 +0,0 @@
-format :html do
-#  include Structure::HtmlFormat
-end

data/spec/lib/card/flexmail_spec.rb

@@ -1,209 +0,0 @@
-# -*- encoding : utf-8 -*-
-
-describe Card::Flexmail do
-  describe "#email_config_cardnames" do
-    it "handles relative names" do
-      Card::Auth.as_bot do
-        Card.create! :name=>'emailtest+*right+*send', :content=>'[[_left+email_config]]', :type=>'Pointer'
-        trigger_card = Card.new(:name=>'Huckleberry+emailtest')
-        Card::Flexmail.email_config_cardnames(trigger_card).first.should=='emailtest+*right+email_config'
-      end
-    end
-  end
-
-  describe ".configs_for" do
-    before do
-      Card::Auth.current_id = Card::WagnBotID
-      Card.create! :name => "mailconfig+*to", :content => "joe@user.com"
-      Card.create! :name => "mailconfig+*from", :content => "from@user.com"
-      Card.create! :name => "mailconfig+*subject", :content => "Subject of the mail"
-      Card.create! :name => "emailtest+*right+*send", :content => "[[mailconfig]]"
-    end
-
-    it "returns empty list for card with no configs" do
-      Card::Flexmail.configs_for( Card.new( :name => "random" )).should == []
-    end
-
-    it "takes Pointer value for extended_list fields" do
-      Card.create! :name => "mailconfig+*cc", :content => "[[mailconfig+*to]]", :type=>'Pointer'
-      c = Card.new(:name=>'Passion Fruit+emailtest')
-      Card::Flexmail.configs_for(c)[0][:cc].should == 'joe@user.com'
-    end
-
-    it "handles *email cards" do
-      Card::Auth.as_bot do
-        Card.create! :name => "mailconfig+*cc", :content => "[[Joe User+*email]]", :type=>'Pointer'
-        Card.create! :name => "mailconfig+*bcc", :content => '{"name":"Joe Admin","append":"*email"}', :type=>'Search'
-      end
-      c = Card.new(:name=>'Kiwi+emailtest')
-      conf = Card::Flexmail.configs_for(c)[0]
-      conf[:cc].should == 'joe@user.com'
-      conf[:bcc].should == 'joe@admin.com'
-    end
-
-    it "returns list with correct hash for card with configs" do
-      Card.create! :name => "mailconfig+*message", :content => "It's true that {{_left+story|core}}"
-      c = Card.create :name=>'Banana+story', :content=>"I was born a poor black seed"
-      c = Card.create :name => "Banana+emailtest", :content => "data content"
-      Card::Flexmail.configs_for(c).should == [{
-        :to => "joe@user.com",
-        :from => "from@user.com",
-        :bcc => "",
-        :cc => "",
-        :subject => "Subject of the mail",
-        :message => "It's true that I was born a poor black seed",
-        :attach => ""
-      }]
-    end
-  end
-
-  describe "complex configs for" do
-    before do
-      class ActionView::Base
-        def params
-          if @controller
-            @controller.params
-          else
-            {}
-          end
-        end
-      end
-
-      Card::Auth.as_bot do
-        Card.create!  :name => 'Bobs addy', :content=>'bob@bob.com', :type=>'Phrase'
-        Card.create!  :name => 'default subject', :content=>'a very nutty thang', :type=>'Phrase'
-        Card.create!  :name => "mailconfig+*to", :content => %{ {"key":"bob_addy"} }, :type=>'Search'
-        Card.create!  :name => "mailconfig+*from", :content => %{ {"left":"_left", "right":"email"} }, :type=>'Search'
-        Card.create!  :name => "subject search+*right+*structure", :content => %{{"referred_to_by":"_self+subject"}}, :type=>'Search'
-        Card.create!  :name => "mailconfig+*subject", :content => "{{+subject search|core;item:core}}"
-        Card.create! :name => "mailconfig+*message", :content => "Triggered by {{_self|name}} and its wonderful content: {{_self|core}}"
-        Card.create! :name => "mailconfig+*attach", :type=>"Pointer", :content => "[[_self+attachment]]"
-        Card.create! :name=>'Trigger', :type=>'Cardtype'
-        Card.create :name=>'Trigger+*type+*create', :type=>'Pointer', :content=>'[[Anonymous]]'
-        Card.create! :name=>'Trigger+*type+*structure', :content=>''
-        Card.create! :name => "Trigger+*type+*send", :content => "[[mailconfig]]", :type=>'Pointer'
-      end
-    end
-
-    it "returns list with correct hash for card with configs" do
-      pending 'spec is breaking but flexmail is being refactored'
-      Card::Auth.as_bot do
-        Card::Env[:protocol] = 'http://'
-        Card::Env[:host]     = 'a.com'
-        
-        #c = Card.new(:name => "Banana Trigger", :content => "data content [[A]]", :type=>'Trigger')
-        #warn "boom: #{ Card::Flexmail.configs_for(c).inspect }"
-        
-        c = Card.create(
-          :name    => "Banana Trigger",
-          :content => "data content [[A]]",
-          :type    => 'Trigger',
-          :subcards=> {
-            '+email'      => {:content=>'gary@gary.com'},
-            '+subject'    => {:type=>'Pointer', :content=>'[[default subject]]'},
-#            '+attachment' => {:type=>'File', :content=>"notreally.txt" }
-          }
-        )
-        conf = Card::Flexmail.configs_for(c).first
-
-        conf[:to     ].should == "bob@bob.com"
-        conf[:from   ].should == "gary@gary.com"
-        conf[:bcc    ].should == ''
-        conf[:cc     ].should == ''
-        conf[:subject].should == "a very nutty thang"
-#        conf[:attach ].should == ['Banana Trigger+attachment']
-        conf[:message].should == "Triggered by Banana Trigger and its wonderful content: data content " +
-          '<a class="known-card" href="http://a.com/A">A</a>'
-      end
-    end
-  end
-
-  describe "hooks for" do
-    describe "untemplated card" do
-      before do
-        Card::Auth.as_bot {
-          Card.create! :name => "emailtest+*right+*send", :type => "Pointer", :content => "[[mailconfig]]"
-          Card.create! :name => "mailconfig+*to", :content => "joe@user.com"
-        }
-      end
-
-      it "calls to mailer only on Card#create" do
-        Card::Auth.as_bot do
-          mock( Card::Mailer ).flexmail( hash_including :to=>"joe@user.com" ).times 1
-          c =Card.create :name => "Banana+emailtest"
-          c.update_attributes! :content => 'short lived'
-          c.delete!
-        end
-        
-      end
-      
-
-      it "handles case of referring to self for content" do
-        Card::Auth.as_bot do
-          Card.create! :name => "Email", :type => "Cardtype"
-          Card.create! :name => "Email+*type+*send", :type => "Pointer", :content => "[[mailconfig]]"
-          Card.create! :name => "mailconfig+*message", :content => "this {{_self|core}}"
-        end
-
-        Rails.logger.level = ActiveSupport::BufferedLogger::Severity::DEBUG
-        mock(Card::Mailer).flexmail(hash_including(:message=>"this had betta work"))
-        Card.create!(:name => "ToYou", :type => "Email", :content => "had betta work")
-      end
-
-    end
-
-    describe "templated card" do
-      before do
-        Card::Auth.as_bot do
-          Card.create! :name => "Book+*type+*send", :type => "Pointer",
-            :content => "[[mailconfig]]"
-          Card.create! :name => "mailconfig+*to", :content => "joe@user.com"
-        end
-      end
-
-      it "doesn't call to mailer on Card#create" do
-        mock.dont_allow(Card::Mailer).flexmail
-        Card.create :name => "Banana+emailtest"
-      end
-
-      it "calls to mailer on Card#create" do
-        mock(Card::Mailer).flexmail(hash_including(:to=>"joe@user.com")).at_least(1)
-        c = Card.create :name => "Illiodity", :type=>"Book"
-        Card.update(c.id, :subcards=> {"~author" => {"name" => "Bukowski"}})
-      end
-    end
-  end
-
-  # Note: this mailer method and the corresponding template are defined in the regular rails places
-  # rather that the flexmail module.
-  # They can/should be brought out to more modular space if/when modules support adding
-  # view template (through adding directories, etc.)
-  describe Card::Mailer do
-    # to access things like 'create_account_url' include UrlWriter
-    # include ActionController::UrlWriter
-
-    before(:all) do
-      @email = Card::Mailer.flexmail({
-        :to=>"joe@user.com",
-        :subject=>"boo-ya",
-        :message=>"Ipsum Daido Lorem"
-      })
-    end
-
-    it "respects to:" do
-      @email.to.first.should == "joe@user.com"
-    end
-
-    it "respects subject:" do
-      @email.subject.should match /boo-ya/
-    end
-
-    it "respects content:" do
-      @email.body.should match /Ipsum Daido Lorem/
-    end
-  end
-end
-
-
-
-

data/spec/lib/card/revision_spec.rb

@@ -1,30 +0,0 @@
-# -*- encoding : utf-8 -*-
-
-describe Card::Revision do
-
-  it 'should be created whenever content is updated' do
-    author1 = Card::Auth[ 'joe@user.com' ]
-    author2 = Card::Auth[ 'sara@user.com' ]
-    author_cd1 = Card[author1.id]
-    author_cd2 = Card[author2.id]
-    Card::Auth.current_id = Card::WagnBotID
-    rc1=author_cd1.fetch(:new=>{}, :trait=>:roles)
-    rc1 << Card::AdministratorID
-    rc2 = author_cd2.fetch(:new=>{}, :trait=>:roles)
-    rc2 << Card::AdministratorID
-    author_cd1.save
-    author_cd2.save
-    Card::Auth.current_id = author_cd1.id
-    card = Card.create! :name=>'alpha', :content=>'stuff'
-    Card::Auth.current_id = author_cd2.id
-    card.content = 'boogy'
-    card.save
-    card.reload
-
-    assert_equal 2, card.revisions.count, 'Should have two revisions'
-    assert_equal author_cd2.name, card.current_revision.creator.name, 'current author'
-    assert_equal author_cd1.name, card.revisions.first.creator.name,  'first author'
-  end
-
-
-end

data/spec/mod/core/chunk/literal_spec.rb

@@ -1,14 +0,0 @@
-# -*- encoding : utf-8 -*-
-
-describe Card::Chunk::EscapedLiteral, "literal chunk tests" do
-
-  it "should handle escaped link" do
-    render_content('write this: \[[text]]').should == 'write this: <span>[</span>[text]]'
-  end
-
-  it "should handle escaped inclusion" do
-    render_content('write this: \{{cardname}}').should == 'write this: <span>{</span>{cardname}}'
-  end
-
-end
-

data/spec/mod/core/set/all/attribute_tracking_spec.rb

@@ -1,21 +0,0 @@
-# -*- encoding : utf-8 -*-
-
-describe Card::Set::All::AttributeTracking do
-  context "new card" do
-    before(:each) do
-      Card::Auth.as_bot do
-        @c = Card.new :name=>"New Card", :content=>"Great Content"
-      end
-    end
-
-    it "should have updates" do
-      described_class::Updates.should === @c.updates
-    end
-
-    it "should track changes" do
-      @c.name.should == 'New Card'
-      @c.name = 'Old Card'
-      @c.name.should == 'Old Card'
-    end
-  end
-end

data/spec/mod/core/set/all/collection_spec.rb

@@ -1,45 +0,0 @@
-# -*- encoding : utf-8 -*-
-
-describe Card::Set::All::Collection do
-  describe "#item_names" do
-    it "returns item for each line of basic content" do
-      Card.new( :name=>"foo", :content => "X\nY" ).item_names.should == ["X","Y"]
-    end
-
-    it "returns list of card names for search" do
-      c = Card.new( :name=>"foo", :type=>"Search", :content => %[{"name":"Z"}])
-      c.item_names.should == ["Z"]
-    end
-
-    it "handles searches relative to context card" do
-      # note: A refers to 'Z'
-      Card.new(:name=>"foo", :type=>"Search", :content => %[{"referred_to_by":"_self"}]).item_names( :context=>'A' ).should == ["Z"]
-    end
-  end
-
-  describe "#extended_list" do
-    it "returns item's content for pointer setting" do
-      c = Card.new(:name=>"foo", :type=>"Pointer", :content => "[[Z]]")
-      c.extended_list.should == ["I'm here to be referenced to"]
-    end
-  end
-
-  describe "#contextual_content" do
-
-    it "processes inclusions relative to context card" do
-      context_card = Card["A"] # refers to 'Z'
-      c = Card.new(:name=>"foo", :content => "{{_self+B|core}}")
-      c.contextual_content( context_card ).should == "AlphaBeta"
-    end
-
-    it "returns content even when context card is hard templated" do #why the heck is this good?  -efm
-      context_card = Card["A"] # refers to 'Z'
-      
-      Card::Auth.as_bot do
-        Card.create! :name => "A+*self+*structure", :content => "Banana"
-      end
-      c = Card.new( :name => "foo", :content => "{{_self+B|core}}" )
-      c.contextual_content( context_card ).should == "AlphaBeta"
-    end
-  end
-end

data/spec/mod/core/set/all/content_spec.rb

@@ -1,14 +0,0 @@
-# -*- encoding : utf-8 -*-
-
-describe Card::Set::All::Content do
-  describe 'save_draft' do
-    it 'should store a draft revision' do
-      @card = Card.create! :name=>"mango", :content=>"foo"
-      @card.save_draft("bar")
-      assert_equal 1, @card.drafts.length
-      @card.save_draft("booboo")
-      assert_equal 1, @card.drafts.length
-      assert_equal "booboo", @card.drafts[0].content
-    end
-  end
-end