Add wordwrap option to Interfaces::Interface, also;

Default wordwrap to true.

Work relating to #341.

lib/vedeu/dsl/helpers/attributes.rb

@@ -124,7 +124,7 @@ def defaults
           style:      nil,
           truncate:   false,
           width:      nil,
-          wordwrap:   false,
+          wordwrap:   true,
         }
       end
 

lib/vedeu/dsl/presentation.rb

@@ -129,23 +129,16 @@ def style(value)
       alias styles style
       alias styles= style
 
-      # Specify whether the view should use wordwrapping, or not
-      # (default).
+      # Specify whether the view should use wordwrapping (default).
       #
       # @param value [Boolean]
       # @return [Boolean]
-      def wordwrap(value = false)
+      def wordwrap(value = true)
         boolean = value ? true : false
 
         model.wordwrap = boolean
       end
-
-      # Instruct the view to use wordwrapping.
-      #
-      # @return [Boolean]
-      def wordwrap!
-        wordwrap(true)
-      end
+      alias wordwrap! wordwrap
 
       private
 

lib/vedeu/interfaces/interface.rb

@@ -43,6 +43,10 @@ class Interface
       # @return [Vedeu::Views::Composition]
       attr_accessor :parent
 
+      # @!attribute [rw] wordwrap
+      # @return [Boolean]
+      attr_accessor :wordwrap
+
       # @!attribute [rw] zindex
       # @return [Fixnum]
       attr_accessor :zindex
@@ -60,6 +64,7 @@ class Interface
       # @option attributes repository [Vedeu::Interfaces::Repository]
       # @option attributes style [Vedeu::Presentation::Style]
       # @option attributes visible [Boolean]
+      # @option attributes wordwrap [Boolean]
       # @option attributes zindex [Fixnum]
       # @return [Vedeu::Interfaces::Interface]
       def initialize(attributes = {})
@@ -82,6 +87,7 @@ def attributes
           repository:     repository,
           style:          style,
           visible:        visible,
+          wordwrap:       wordwrap,
           zindex:         zindex,
         }
       end
@@ -156,6 +162,7 @@ def defaults
           repository:     Vedeu.interfaces,
           style:          :normal,
           visible:        true,
+          wordwrap:       true,
           zindex:         0,
         }
       end

lib/vedeu/views/default_attributes.rb

@@ -67,7 +67,7 @@ def defaults
           truncate: false,
           value:    '',
           width:    nil,
-          wordwrap: false,
+          wordwrap: true,
         }
       end
 

test/lib/vedeu/dsl/presentation_test.rb

@@ -148,28 +148,28 @@ module DSL
         context 'when the value is not given' do
           subject { instance.wordwrap }
 
-          it { subject.must_equal() }
+          it { subject.must_equal(true) }
         end
 
         context 'when the value is given' do
-          let(:_value) { false }
-
           subject { instance.wordwrap(_value) }
 
           context 'when the value is nil' do
             let(:_value) { nil }
 
-            it { subject.must_equal() }
+            it { subject.must_equal(false) }
           end
 
           context 'when the value is false' do
-            it { subject.must_equal() }
+            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() }
+            it { subject.must_equal(true) }
           end
         end
 
@@ -178,8 +178,6 @@ module DSL
 
       describe '#wordwrap!' do
         it { instance.must_respond_to(:wordwrap!) }
-
-        # @todo Add more tests.
       end
 
     end # Presentation

test/lib/vedeu/views/default_attributes_test.rb

@@ -90,7 +90,7 @@ def nil_for_testing_purposes
             style:    nil,
             truncate: false,
             width:    nil,
-            wordwrap: false,
+            wordwrap: true,
           }
         }