vedeu 0.8.9 → 0.8.10

data/test/lib/vedeu/dsl/dsl_test.rb

@@ -23,13 +23,14 @@ module Vedeu
   describe DSL do
 
     let(:described) { Vedeu::DSL }
-    let(:instance)  { Vedeu::DSLModuleTestClass.new(model, client) }
+    let(:included_described) { Vedeu::DSLModuleTestClass }
+    let(:included_instance)  { included_described.new(model, client) }
     let(:model)     { Vedeu::DSLModelTestClass.new(_name) }
     let(:client)    {}
     let(:_name)     {}
 
     describe '#name' do
-      subject { instance.name }
+      subject { included_instance.name }
 
       context 'when the model is nil' do
         let(:model) {}

data/test/lib/vedeu/dsl/elements_test.rb

@@ -20,12 +20,10 @@ module Vedeu
 
     describe Elements do
 
-      let(:described) { Vedeu::DSL::Elements }
-      let(:instance)  {}
-
-      let(:including_described) { Vedeu::DSL::ElementsTest }
-      let(:including_instance)  { including_described.new(model) }
-      let(:model)               {}
+      let(:described)          { Vedeu::DSL::Elements }
+      let(:included_described) { Vedeu::DSL::ElementsTest }
+      let(:included_instance)  { included_described.new(model) }
+      let(:model)              {}
 
       describe '#centre' do
         let(:_value) {}
@@ -35,7 +33,7 @@ module Vedeu
           }
         }
 
-        subject { including_instance.centre(_value, opts) }
+        subject { included_instance.centre(_value, opts) }
 
         context 'when a model exists' do
         end
@@ -46,7 +44,7 @@ module Vedeu
       end
 
       describe '#center' do
-        it { including_instance.must_respond_to(:center) }
+        it { included_instance.must_respond_to(:center) }
       end
 
       describe '#left' do
@@ -57,7 +55,7 @@ module Vedeu
           }
         }
 
-        subject { including_instance.left(_value, opts) }
+        subject { included_instance.left(_value, opts) }
 
         context 'when a model exists' do
         end
@@ -75,7 +73,7 @@ module Vedeu
           }
         }
 
-        subject { including_instance.right(_value, opts) }
+        subject { included_instance.right(_value, opts) }
 
         context 'when a model exists' do
         end
@@ -88,7 +86,7 @@ module Vedeu
       describe '#lines' do
         let(:opts) { {} }
 
-        subject { including_instance.lines(opts) { } }
+        subject { included_instance.lines(opts) { } }
 
         context 'when the block is given' do
           context 'when a model exists' do
@@ -101,20 +99,20 @@ module Vedeu
         end
 
         context 'when the block is not given' do
-          subject { including_instance.lines }
+          subject { included_instance.lines }
 
           it { proc { subject }.must_raise(Vedeu::Error::RequiresBlock) }
         end
 
         context 'when the opts parameter is not given' do
-          subject { including_instance.lines { } }
+          subject { included_instance.lines { } }
 
           # @todo Add more tests.
         end
       end
 
       describe '#line' do
-        subject { including_instance.line { } }
+        subject { included_instance.line { } }
 
         context 'when a model exists' do
           let(:model) { Vedeu::Views::View.new }
@@ -124,7 +122,7 @@ module Vedeu
           end
 
           context 'when the block is not given' do
-            subject { including_instance.line }
+            subject { included_instance.line }
 
             # @todo Add more tests.
           end
@@ -138,7 +136,7 @@ module Vedeu
       describe '#streams' do
         let(:opts) { {} }
 
-        subject { including_instance.streams(opts) { } }
+        subject { included_instance.streams(opts) { } }
 
         context 'when the block is given' do
           context 'when a model exists' do
@@ -153,20 +151,20 @@ module Vedeu
         end
 
         context 'when the block is not given' do
-          subject { including_instance.streams }
+          subject { included_instance.streams }
 
           it { proc { subject }.must_raise(Vedeu::Error::RequiresBlock) }
         end
 
         context 'when the opts parameter is not given' do
-          subject { including_instance.streams { } }
+          subject { included_instance.streams { } }
 
           # @todo Add more tests.
         end
       end
 
       describe '#stream' do
-        subject { including_instance.stream { } }
+        subject { included_instance.stream { } }
 
         context 'when a model exists' do
           let(:model) { Vedeu::Views::View.new }
@@ -176,7 +174,7 @@ module Vedeu
           end
 
           context 'when the block is not given' do
-            subject { including_instance.stream }
+            subject { included_instance.stream }
 
             # @todo Add more tests.
           end
@@ -195,7 +193,7 @@ module Vedeu
           }
         }
 
-        subject { including_instance.text(_value, opts) }
+        subject { included_instance.text(_value, opts) }
 
         context 'when a model exists' do
         end

data/test/lib/vedeu/dsl/presentation_test.rb

@@ -118,6 +118,12 @@ module Vedeu
         it { instance.must_respond_to(:colour=) }
       end
 
+      describe '#no_wordwrap!' do
+        it { instance.must_respond_to(:no_wordwrap!) }
+
+        # @todo Add more tests.
+      end
+
       describe '#style' do
         let(:args) { :bold }
 
@@ -138,6 +144,42 @@ module Vedeu
         it { instance.must_respond_to(:styles=) }
       end
 
+      describe '#wordwrap' do
+        context 'when the value is not given' do
+          subject { instance.wordwrap }
+
+          it { subject.must_equal(true) }
+        end
+
+        context 'when the value is given' do
+          subject { instance.wordwrap(_value) }
+
+          context 'when the value is nil' do
+            let(:_value) { nil }
+
+            it { subject.must_equal(false) }
+          end
+
+          context 'when the value is false' do
+            let(:_value) { false }
+
+            it { subject.must_equal(false) }
+          end
+
+          context 'when the value evaluates as true' do
+            let(:_value) { :a_true_value }
+
+            it { subject.must_equal(true) }
+          end
+        end
+
+        it { instance.must_respond_to(:wordwrap) }
+      end
+
+      describe '#wordwrap!' do
+        it { instance.must_respond_to(:wordwrap!) }
+      end
+
     end # Presentation
 
   end # DSL

data/test/lib/vedeu/editor/collection_test.rb

@@ -21,14 +21,15 @@ module Vedeu
 
     describe Collection do
 
-      let(:described)  { Vedeu::Editor::Collection }
-      let(:instance)   { Vedeu::Editor::CollectionTestClass.new(collection) }
-      let(:collection) { 'Some text...'.chars }
+      let(:described)          { Vedeu::Editor::Collection }
+      let(:included_described) { Vedeu::Editor::CollectionTestClass }
+      let(:included_instance)  { included_described.new(collection) }
+      let(:collection)         { 'Some text...'.chars }
 
       describe '#by_index' do
         let(:index) { 0 }
 
-        subject { instance.by_index(index) }
+        subject { included_instance.by_index(index) }
 
         it { subject.must_be_instance_of(String) }
       end

data/test/lib/vedeu/editor/line_test.rb

@@ -23,6 +23,10 @@ module Vedeu
         end
       end
 
+      describe '.coerce' do
+        it { described.must_respond_to(:coerce) }
+      end
+
       describe '#collection' do
         it { instance.must_respond_to(:collection) }
       end
@@ -31,33 +35,6 @@ module Vedeu
         it { instance.must_respond_to(:collection=) }
       end
 
-      describe '.coerce' do
-        let(:_value) {}
-
-        subject { described.coerce(_value) }
-
-        it { subject.must_be_instance_of(Vedeu::Editor::Line) }
-
-        context 'when the value is already a Vedeu::Editor::Line object' do
-          let(:_value) { Vedeu::Editor::Line.new(collection) }
-
-          it { subject.must_equal(_value) }
-          it { subject.collection.must_equal(collection) }
-        end
-
-        context 'when the value is an empty String' do
-          let(:_value) { '' }
-
-          it { subject.collection.must_equal('') }
-        end
-
-        context 'when the value is an String' do
-          let(:_value) { collection }
-
-          it { subject.collection.must_equal(collection) }
-        end
-      end
-
       describe '#character' do
         let(:index) { 5 }
 

data/test/lib/vedeu/editor/lines_test.rb

@@ -29,6 +29,10 @@ module Vedeu
         end
       end
 
+      describe '.coerce' do
+        it { described.must_respond_to(:coerce) }
+      end
+
       describe '#collection' do
         it { instance.must_respond_to(:collection) }
       end
@@ -41,60 +45,6 @@ module Vedeu
         it { instance.must_respond_to(:lines) }
       end
 
-      describe '.coerce' do
-        let(:document) {}
-
-        subject { described.coerce(document) }
-
-        it { subject.must_be_instance_of(described) }
-
-        context 'when the document is already a Vedeu::Editor::Lines object' do
-          let(:document) { Vedeu::Editor::Lines.new(collection) }
-
-          it { subject.must_equal(document) }
-          it { subject.collection.must_equal(collection) }
-        end
-
-        context 'when the document is an empty Array' do
-          let(:document) { [] }
-
-          it { subject.collection.must_equal([]) }
-        end
-
-        context 'when the document is an Array' do
-          let(:document) {
-            [
-              Vedeu::Editor::Line.new('Some text...'),
-              :more_text,
-              'Other text...',
-            ]
-          }
-          let(:expected) {
-            [
-              Vedeu::Editor::Line.new('Some text...'),
-              Vedeu::Editor::Line.new(''),
-              Vedeu::Editor::Line.new('Other text...'),
-            ]
-          }
-
-          it { subject.collection.must_equal(expected) }
-        end
-
-        context 'when the document is a String' do
-          let(:document) { "Some text...\nMore text..." }
-
-          context 'but it is empty' do
-            let(:document) { '' }
-
-            it { subject.must_equal(Vedeu::Editor::Lines.new) }
-          end
-
-          context 'but it has no line breaks' do
-
-          end
-        end
-      end
-
       describe '#delete_character' do
         let(:x)         { 0 }
         let(:y)         { 0 }

data/test/lib/vedeu/logging/timer_test.rb

@@ -51,7 +51,17 @@ module Vedeu
         context 'when the block is not given' do
           subject { instance.measure }
 
-          it { proc { subject }.must_raise(Vedeu::Error::RequiresBlock) }
+          context 'when debugging is enabled' do
+            before { Vedeu.config.stubs(:debug?).returns(true) }
+
+            it { proc { subject }.must_raise(Vedeu::Error::RequiresBlock) }
+          end
+
+          context 'when debugging is disabled' do
+            before { Vedeu.config.stubs(:debug?).returns(false) }
+
+            it { subject.must_equal(nil) }
+          end
         end
       end
 

data/test/lib/vedeu/models/toggleable_test.rb

@@ -5,6 +5,7 @@ require 'test_helper'
 module Vedeu
 
   class ToggleableTestClass
+
     include Vedeu::Toggleable
 
     def initialize(boolean)
@@ -14,79 +15,80 @@ module Vedeu
     def store
       self
     end
-  end
+
+  end # ToggleableTestClass
 
   describe Toggleable do
 
     let(:described)          { Vedeu::Toggleable }
-    let(:described_included) { Vedeu::ToggleableTestClass }
-    let(:instance)           { described_included.new(visible) }
+    let(:included_described) { Vedeu::ToggleableTestClass }
+    let(:included_instance)  { included_described.new(visible) }
     let(:visible)            { false }
 
     describe '#visible' do
-      it { instance.must_respond_to(:visible) }
+      it { included_instance.must_respond_to(:visible) }
     end
 
     describe '#visible=' do
-      it { instance.must_respond_to(:visible=) }
+      it { included_instance.must_respond_to(:visible=) }
     end
 
     describe '#visible?' do
-      it { instance.must_respond_to(:visible?) }
+      it { included_instance.must_respond_to(:visible?) }
     end
 
     describe '#hide' do
-      subject { instance.hide }
+      subject { included_instance.hide }
 
       it do
         subject
-        instance.instance_variable_get('@visible').must_equal(false)
+        included_instance.instance_variable_get('@visible').must_equal(false)
       end
 
-      it { Vedeu::ToggleableTestClass.must_respond_to(:hide_cursor) }
-      it { Vedeu::ToggleableTestClass.must_respond_to(:hide_group) }
-      it { Vedeu::ToggleableTestClass.must_respond_to(:hide_interface) }
+      it { included_described.must_respond_to(:hide_cursor) }
+      it { included_described.must_respond_to(:hide_group) }
+      it { included_described.must_respond_to(:hide_interface) }
     end
 
     describe '#show' do
-      subject { instance.show }
+      subject { included_instance.show }
 
       it do
         subject
-        instance.instance_variable_get('@visible').must_equal(true)
+        included_instance.instance_variable_get('@visible').must_equal(true)
       end
 
-      it { Vedeu::ToggleableTestClass.must_respond_to(:show_cursor) }
-      it { Vedeu::ToggleableTestClass.must_respond_to(:show_group) }
-      it { Vedeu::ToggleableTestClass.must_respond_to(:show_interface) }
+      it { included_described.must_respond_to(:show_cursor) }
+      it { included_described.must_respond_to(:show_group) }
+      it { included_described.must_respond_to(:show_interface) }
     end
 
     describe '#toggle' do
-      subject { instance.toggle }
+      subject { included_instance.toggle }
 
-      it { Vedeu::ToggleableTestClass.must_respond_to(:toggle_cursor) }
-      it { Vedeu::ToggleableTestClass.must_respond_to(:toggle_group) }
-      it { Vedeu::ToggleableTestClass.must_respond_to(:toggle_interface) }
+      it { included_described.must_respond_to(:toggle_cursor) }
+      it { included_described.must_respond_to(:toggle_group) }
+      it { included_described.must_respond_to(:toggle_interface) }
 
       context 'when the model is visible' do
         let(:visible) { true }
 
         it do
           subject
-          instance.instance_variable_get('@visible').must_equal(false)
+          included_instance.instance_variable_get('@visible').must_equal(false)
         end
       end
 
       context 'when the model is not visible' do
         it do
           subject
-          instance.instance_variable_get('@visible').must_equal(true)
+          included_instance.instance_variable_get('@visible').must_equal(true)
         end
       end
     end
 
     describe '.hide_cursor' do
-      subject { described_included.hide_cursor }
+      subject { included_described.hide_cursor }
 
       context 'when the cursor is visible' do
         # @todo Add more tests.
@@ -98,7 +100,7 @@ module Vedeu
     end
 
     describe '.show_cursor' do
-      subject { described_included.show_cursor }
+      subject { included_described.show_cursor }
 
       context 'when the cursor is visible' do
         # @todo Add more tests.
@@ -110,7 +112,7 @@ module Vedeu
     end
 
     describe '.toggle_cursor' do
-      subject { described_included.toggle_cursor }
+      subject { included_described.toggle_cursor }
 
       context 'when the cursor is visible' do
         # @todo Add more tests.