vedeu 0.6.21 → 0.6.22

data/test/lib/vedeu/output/clear/interface_test.rb

@@ -7,12 +7,18 @@ module Vedeu
     describe Interface do
 
       let(:described) { Vedeu::Clear::Interface }
-      let(:instance)  { described.new(_name) }
+      let(:instance)  { described.new(_name, options) }
+      let(:options)   {
+        {
+          content_only: false,
+        }
+      }
       let(:_name)     { 'Vedeu::Clear::Interface' }
 
       describe '#initialize' do
         it { instance.must_be_instance_of(described) }
         it { instance.instance_variable_get('@name').must_equal(_name) }
+        it { instance.instance_variable_get('@options').must_equal(options) }
       end
 
       describe '.render' do

data/test/lib/vedeu/output/viewport_test.rb

@@ -38,211 +38,32 @@ module Vedeu
       end
 
       describe '.render' do
+        before do
+          Vedeu::Output::Output.stubs(:render)
+        end
+
         subject { described.render(view) }
 
         context 'when the interface is visible' do
-          # @todo Add more tests.
-          # it { skip }
+          it {
+            Vedeu::Output::Output.expects(:render)
+            subject
+          }
         end
 
         context 'when the interface is not visible' do
           let(:visible) { false }
 
-          it { subject.must_be_instance_of(Array) }
-
-          it { subject.must_equal([]) }
+          it { subject.must_equal(nil) }
         end
       end
 
       describe '#render' do
-        let(:cursor) {
-          Vedeu::Cursors::Cursor.new(name:    'lithium',
-                                     ox:      ox,
-                                     oy:      oy,
-                                     visible: true,
-                                     x:       x,
-                                     y:       y) }
-        let(:lines)  { [] }
-        let(:ox)     { 0 }
-        let(:oy)     { 0 }
-        let(:x)      { 1 }
-        let(:y)      { 1 }
-
-        subject { instance.render }
-
-        it { subject.must_be_instance_of(Array) }
-
-        context 'when there is no content' do
-          before { view.stubs(:lines).returns([]) }
-
-          it { subject.must_equal([]) }
-        end
+        it { instance.must_respond_to(:render) }
       end
 
       describe '#to_s' do
-        let(:cursor) {
-          Vedeu::Cursors::Cursor.new(name:    'lithium',
-                                     ox:      ox,
-                                     oy:      oy,
-                                     visible: true,
-                                     x:       x,
-                                     y:       y) }
-        let(:lines)  { [] }
-        let(:ox)     { 0 }
-        let(:oy)     { 0 }
-        let(:x)      { 1 }
-        let(:y)      { 1 }
-
-        subject { instance.to_s }
-
-        it { subject.must_be_instance_of(String) }
-
-        context 'when there is no content' do
-          before { view.stubs(:lines).returns([]) }
-
-          it { subject.must_equal('') }
-        end
-
-        context 'when there is content' do
-          context 'when the cursor y position is outside the viewable area' do
-            let(:ox) { -4 }
-            let(:oy) { -4 }
-
-            it 'scrolls the content the correct position' do
-              subject.must_equal(
-                "\e[1;1H\e[39m\e[49mb\n" \
-                "\e[1;2H\e[39m\e[49ma\n" \
-                "\e[1;3H\e[39m\e[49mr\n" \
-                "\e[2;1H\e[39m\e[49mc\n" \
-                "\e[2;2H\e[39m\e[49ma\n" \
-                "\e[2;3H\e[39m\e[49mr\n" \
-                "\e[3;1H\e[39m\e[49mh\n" \
-                "\e[3;2H\e[39m\e[49me\n" \
-                "\e[3;3H\e[39m\e[49ml"
-              )
-            end
-          end
-
-          context 'when the cursor y position is inside the viewable area' do
-            context 'when there is not enough content to fill the height' do
-              let(:ox) { 3 }
-              let(:oy) { 7 }
-
-              it 'renders the visible content' do
-                subject.must_equal(
-                  "\e[1;1H\e[39m\e[49mb\n" \
-                  "\e[1;2H\e[39m\e[49ma\n" \
-                  "\e[1;3H\e[39m\e[49mr\n" \
-                  "\e[2;1H\e[39m\e[49mc\n" \
-                  "\e[2;2H\e[39m\e[49ma\n" \
-                  "\e[2;3H\e[39m\e[49mr\n" \
-                  "\e[3;1H\e[39m\e[49mh\n" \
-                  "\e[3;2H\e[39m\e[49me\n" \
-                  "\e[3;3H\e[39m\e[49ml"
-                )
-              end
-            end
-
-            context 'when there is more content than the height' do
-              let(:ox) { 3 }
-              let(:oy) { 3 }
-
-              it 'is cropped to show only that which fits' do
-                subject.must_equal(
-                  "\e[1;1H\e[39m\e[49mb\n" \
-                  "\e[1;2H\e[39m\e[49ma\n" \
-                  "\e[1;3H\e[39m\e[49mr\n" \
-                  "\e[2;1H\e[39m\e[49mc\n" \
-                  "\e[2;2H\e[39m\e[49ma\n" \
-                  "\e[2;3H\e[39m\e[49mr\n" \
-                  "\e[3;1H\e[39m\e[49mh\n" \
-                  "\e[3;2H\e[39m\e[49me\n" \
-                  "\e[3;3H\e[39m\e[49ml"
-                )
-              end
-            end
-          end
-
-          context 'when the cursor x position is outside the viewable area' do
-            context 'but inside the content' do
-              let(:ox) { 6 }
-              let(:oy) { 6 }
-
-              it 'scrolls the content the correct position' do
-                subject.must_equal(
-                  "\e[1;1H\e[39m\e[49mb\n" \
-                  "\e[1;2H\e[39m\e[49ma\n" \
-                  "\e[1;3H\e[39m\e[49mr\n" \
-                  "\e[2;1H\e[39m\e[49mc\n" \
-                  "\e[2;2H\e[39m\e[49ma\n" \
-                  "\e[2;3H\e[39m\e[49mr\n" \
-                  "\e[3;1H\e[39m\e[49mh\n" \
-                  "\e[3;2H\e[39m\e[49me\n" \
-                  "\e[3;3H\e[39m\e[49ml"
-                )
-              end
-            end
-
-            context 'and outside the content' do
-              let(:ox) { 7 }
-              let(:oy) { 7 }
-
-              it 'scrolls the content the correct position' do
-                subject.must_equal(
-                  "\e[1;1H\e[39m\e[49mb\n" \
-                  "\e[1;2H\e[39m\e[49ma\n" \
-                  "\e[1;3H\e[39m\e[49mr\n" \
-                  "\e[2;1H\e[39m\e[49mc\n" \
-                  "\e[2;2H\e[39m\e[49ma\n" \
-                  "\e[2;3H\e[39m\e[49mr\n" \
-                  "\e[3;1H\e[39m\e[49mh\n" \
-                  "\e[3;2H\e[39m\e[49me\n" \
-                  "\e[3;3H\e[39m\e[49ml"
-                )
-              end
-            end
-          end
-
-          context 'when the cursor x position is inside the viewable area' do
-            context 'when there is not enough content to fill the width' do
-              let(:ox) { 7 }
-              let(:oy) { 3 }
-
-              it 'renders the visible content' do
-                subject.must_equal(
-                  "\e[1;1H\e[39m\e[49mb\n" \
-                  "\e[1;2H\e[39m\e[49ma\n" \
-                  "\e[1;3H\e[39m\e[49mr\n" \
-                  "\e[2;1H\e[39m\e[49mc\n" \
-                  "\e[2;2H\e[39m\e[49ma\n" \
-                  "\e[2;3H\e[39m\e[49mr\n" \
-                  "\e[3;1H\e[39m\e[49mh\n" \
-                  "\e[3;2H\e[39m\e[49me\n" \
-                  "\e[3;3H\e[39m\e[49ml"
-                )
-              end
-            end
-
-            context 'when there is more content than the width' do
-              let(:ox) { 3 }
-              let(:oy) { 3 }
-
-              it 'is cropped to show only that which fits' do
-                subject.must_equal(
-                  "\e[1;1H\e[39m\e[49mb\n" \
-                  "\e[1;2H\e[39m\e[49ma\n" \
-                  "\e[1;3H\e[39m\e[49mr\n" \
-                  "\e[2;1H\e[39m\e[49mc\n" \
-                  "\e[2;2H\e[39m\e[49ma\n" \
-                  "\e[2;3H\e[39m\e[49mr\n" \
-                  "\e[3;1H\e[39m\e[49mh\n" \
-                  "\e[3;2H\e[39m\e[49me\n" \
-                  "\e[3;3H\e[39m\e[49ml"
-                )
-              end
-            end
-          end
-        end
+        it { instance.must_respond_to(:to_s) }
       end
 
     end # Viewport

data/test/lib/vedeu/runtime/launcher_test.rb

@@ -46,7 +46,8 @@ module Vedeu
       subject { instance.execute! }
 
       it 'returns 0 for successful execution' do
-        subject.must_equal(0)
+        subject
+        instance.exit_code.must_equal(0)
       end
 
       context 'when an uncaught exception occurs' do

data/test/lib/vedeu_test.rb

@@ -3,35 +3,21 @@ require 'test_helper'
 describe Vedeu do
 
   it { Vedeu.must_respond_to(:background_colours) }
-  it { Vedeu.must_respond_to(:borders) }
-  it { Vedeu.must_respond_to(:buffers) }
-  it { Vedeu.must_respond_to(:cursors) }
-  it { Vedeu.must_respond_to(:debug) }
-  it { Vedeu.must_respond_to(:documents) }
-  it { Vedeu.must_respond_to(:events) }
-  it { Vedeu.must_respond_to(:foreground_colours) }
-  it { Vedeu.must_respond_to(:geometries) }
-  it { Vedeu.must_respond_to(:groups) }
-  it { Vedeu.must_respond_to(:interfaces) }
-  it { Vedeu.must_respond_to(:keymaps) }
-  it { Vedeu.must_respond_to(:menus) }
-  it { Vedeu.must_respond_to(:ready!) }
-  it { Vedeu.must_respond_to(:ready?) }
-  it { Vedeu.must_respond_to(:renderer) }
-  it { Vedeu.must_respond_to(:renderers) }
-  it { Vedeu.must_respond_to(:resize) }
-  it { Vedeu.must_respond_to(:timer) }
-
   it { Vedeu.must_respond_to(:bind) }
   it { Vedeu.must_respond_to(:bind_alias) }
   it { Vedeu.must_respond_to(:border) }
+  it { Vedeu.must_respond_to(:borders) }
   it { Vedeu.must_respond_to(:bound?) }
+  it { Vedeu.must_respond_to(:buffers) }
   it { Vedeu.must_respond_to(:clear) }
   it { Vedeu.must_respond_to(:clear_by_group) }
   it { Vedeu.must_respond_to(:clear_by_name) }
+  it { Vedeu.must_respond_to(:clear_content_by_name) }
   it { Vedeu.must_respond_to(:configuration) }
   it { Vedeu.must_respond_to(:configure) }
   it { Vedeu.must_respond_to(:cursor) }
+  it { Vedeu.must_respond_to(:cursors) }
+  it { Vedeu.must_respond_to(:documents) }
   it { Vedeu.must_respond_to(:drb_restart) }
   it { Vedeu.must_respond_to(:drb_start) }
   it { Vedeu.must_respond_to(:drb_status) }
@@ -43,9 +29,12 @@ describe Vedeu do
   it { Vedeu.must_respond_to(:focus_next) }
   it { Vedeu.must_respond_to(:focus_previous) }
   it { Vedeu.must_respond_to(:focussed?) }
+  it { Vedeu.must_respond_to(:foreground_colours) }
+  it { Vedeu.must_respond_to(:geometries) }
   it { Vedeu.must_respond_to(:geometry) }
   it { Vedeu.must_respond_to(:goto) }
   it { Vedeu.must_respond_to(:group) }
+  it { Vedeu.must_respond_to(:groups) }
 
   describe 'Vedeu.height' do
     before { Vedeu::Terminal.stubs(:size).returns([25, 40]) }
@@ -58,17 +47,27 @@ describe Vedeu do
   it { Vedeu.must_respond_to(:hide_group) }
   it { Vedeu.must_respond_to(:hide_interface) }
   it { Vedeu.must_respond_to(:interface) }
+  it { Vedeu.must_respond_to(:interfaces) }
   it { Vedeu.must_respond_to(:keymap) }
+  it { Vedeu.must_respond_to(:keymaps) }
   it { Vedeu.must_respond_to(:keypress) }
   it { Vedeu.must_respond_to(:log) }
   it { Vedeu.must_respond_to(:log_stderr) }
   it { Vedeu.must_respond_to(:log_stdout) }
   it { Vedeu.must_respond_to(:menu) }
+  it { Vedeu.must_respond_to(:menus) }
+  it { Vedeu.must_respond_to(:profile) }
+  it { Vedeu.must_respond_to(:ready!) }
+  it { Vedeu.must_respond_to(:ready?) }
   it { Vedeu.must_respond_to(:render) }
   it { Vedeu.must_respond_to(:renders) }
+  it { Vedeu.must_respond_to(:renderer) }
+  it { Vedeu.must_respond_to(:renderers) }
+  it { Vedeu.must_respond_to(:resize) }
   it { Vedeu.must_respond_to(:show_cursor) }
   it { Vedeu.must_respond_to(:show_group) }
   it { Vedeu.must_respond_to(:show_interface) }
+  it { Vedeu.must_respond_to(:timer) }
   it { Vedeu.must_respond_to(:toggle_cursor) }
   it { Vedeu.must_respond_to(:toggle_group) }
   it { Vedeu.must_respond_to(:toggle_interface) }

data/test/support/examples/borders_app.rb

@@ -7,17 +7,18 @@ require 'vedeu'
 #
 # If you have cloned this repository from GitHub, you can run this example:
 #
-#     ./examples/borders_app.rb
+#     ./test/support/examples/borders_app.rb
 #
 class VedeuBordersApp
 
   Vedeu.bind(:_initialize_) { Vedeu.trigger(:_refresh_) }
 
-  # Be aware that running an application with debugging enabled will affect
+  # Be aware that running an application with profiling enabled will affect
   # performance.
   Vedeu.configure do
-    # debug!
+    debug!
     log '/tmp/vedeu_borders_app.log'
+    # profile!
     raw!
     run_once!
     standalone!

data/test/support/examples/drb_app.rb

@@ -6,17 +6,18 @@ require 'vedeu'
 # An example application to demonstrate the DRb server.
 # If you have cloned this repository from GitHub, you can run this example:
 #
-#     ./examples/drb_app.rb
+#     ./test/support/examples/drb_app.rb
 #
 class VedeuTestApplication
 
   Vedeu.bind(:_initialize_) { Vedeu.trigger(:_refresh_) }
 
-  # Be aware that running an application with debugging enabled will affect
+  # Be aware that running an application with profiling enabled will affect
   # performance.
   Vedeu.configure do
     log         '/tmp/vedeu_test_helper.log'
-    # debug!
+    debug!
+    # profile!
     drb!
     drb_host    'localhost'
     drb_port    21_420

data/test/support/examples/editor_app.rb

@@ -8,23 +8,19 @@ require 'vedeu'
 #
 # If you have cloned this repository from GitHub, you can run this example:
 #
-#     ./examples/material_colours_app.rb
-#
-# Running this application once, and immediately exiting produces the diagram
-# at `./examples/material_colours_app_20150721.svg`. Hopefully this will help
-# you to understand how parts of Vedeu work together. Questions are always
-# welcome at `https://github.com/gavinlaking/vedeu/issues`
+#     ./test/support/examples/material_colours_app.rb
 #
 class VedeuEditorApp
 
   Vedeu.bind(:_initialize_) { Vedeu.trigger(:_refresh_) }
 
-  # Be aware that running an application with debugging enabled will affect
+  # Be aware that running an application with profiling enabled will affect
   # performance.
   Vedeu.configure do
     debug!
     fake!
     log '/tmp/vedeu_editor_app.log'
+    # profile!
     # renderers Vedeu::Renderers::File.new
   end
 

data/test/support/examples/focus_app.rb

@@ -7,8 +7,7 @@ require 'vedeu'
 #
 # If you have cloned this repository from GitHub, you can run this example:
 #
-#     ./examples/focus_app.rb
-#
+#     ./test/support/examples/focus_app.rb
 #
 # First, we set up the interfaces, noting that 'copper' should have focus when
 # the application starts. Also note that 'status' should not show a cursor.
@@ -20,11 +19,12 @@ class VedeuFocusApp
 
   Vedeu.bind(:_initialize_) { Vedeu.trigger(:_refresh_) }
 
-  # Be aware that running an application with debugging enabled will affect
+  # Be aware that running an application with profiling enabled will affect
   # performance.
   Vedeu.configure do
-    # debug!
+    debug!
     log '/tmp/vedeu_focus_app.log'
+    # profile!
   end
 
   update = proc do

data/test/support/examples/hello_world.rb

@@ -7,15 +7,18 @@ require 'vedeu'
 #
 # If you have cloned this repository from GitHub, you can run this example:
 #
-#     ./examples/hello_world.rb
+#     ./test/support/examples/hello_world.rb
 #
 class HelloWorldApp
 
   Vedeu.bind(:_initialize_) { Vedeu.trigger(:_refresh_) }
 
+  # Be aware that running an application with profiling enabled will affect
+  # performance.
   Vedeu.configure do
-    # debug!
+    debug!
     log '/tmp/vedeu_hello_world.log'
+    # profile!
   end
 
   Vedeu.interface 'messages' do