marbu 0.1.0

data/lib/marbu/server/public/js/builder.js

@@ -0,0 +1,200 @@
+$(function(){
+  function add_remove () {
+    var el  = $(this);
+
+    el.find('.add-remove-element:last')
+      .after('<div class="add_remove_button_wrapper clearfix"><button type="button" class="add" title="Add row">Add new row</button><div>');
+
+    var sample_data_button = el.find('a.sample_data');
+    if (sample_data_button.length > 0) {
+      el.find('.add_remove_button_wrapper:last').prepend(sample_data_button);
+    }
+
+    el.find('.add-remove-element > :last-child')
+      .css('margin-right', '0')
+      .after('<a href="#remove" class="remove" title="Remove">del</a>');
+
+    el.find('.add').bind('click', add);
+    el.find('.remove').bind('click', remove);
+
+    show_or_hide_remove_button();
+
+    function add (e) {
+      e.preventDefault();
+      var all       = $(this).parents('.add-remove:first');
+      var my_clone  = $(all.find('.add-remove-element:last').clone(true));
+      my_clone.find('input').val('');
+      all.find('.add-remove-element:last').after(my_clone.hide());
+      my_clone.show('fade', function(){$(this).find('input[type=text]:first').focus();});
+      show_or_hide_remove_button();
+    }
+
+    function remove (e) {
+      e.preventDefault();
+      var me        = $(this).parents('.add-remove-element:first');
+      var all       = me.parents('.add-remove:first');
+      me.hide('fade', function(){$(this).remove(); show_or_hide_remove_button();});
+    }
+
+    function show_or_hide_remove_button () {
+      if (el.find('.add-remove-element').length < 2)
+        el.find('a.remove').hide();
+      else
+        el.find('a.remove').show();
+    }
+  }
+
+  function remote_request (e) {
+    e.preventDefault();
+
+    var el        = $(this);
+    var method    = el.attr('method') || el.attr('data-method') || 'GET';
+    var url       = el.attr('action') || el.attr('href');
+    var data_type = el.attr('data-type') || 'text';
+    var data      = (el.is('form')) ? el.serializeArray():[];
+
+    $.ajax({
+        url:      url,
+        data:     data,
+        dataType: data_type,
+        type:       method.toUpperCase(),
+        beforeSend: function (xhr) {
+          el.trigger('ajax:loading', xhr);
+        },
+        success: function (data, status, xhr) {
+          el.trigger('ajax:success', [data, status, xhr]);
+        },
+        complete: function (element, xhr, statusText) {
+          el.trigger('ajax:complete', [element, xhr, statusText]);
+        },
+        error: function (xhr, status, error) {
+          el.trigger('ajax:failure', [xhr, status, error]);
+        }
+    });
+  }
+
+  function pulldown_click (e) {
+    $(this).next().toggle('slide', {direction: 'up'});
+  }
+
+
+  // $('body').delegate('a[data-ajax="true"]', 'click.remote', remote_request);
+  // $('body').delegate('form[data-ajax="true"]', 'submit.remote', remote_request);
+  $('.add-remove').each(add_remove);
+  $('a[data-type="pulldown"]').bind('click.pulldown', pulldown_click);
+  $('#container .pulldown').hide();
+
+  $('a.delete').live('click', function(event) {
+      if ( confirm("Are you sure you want to delete this item?") )
+          $('<form method="post" action="' + this.href.replace('/delete', '') + '" />')
+              .append('<input type="hidden" name="_method" value="delete" />')
+              .appendTo('body')
+              .submit();
+
+      return false;
+  });
+
+
+  function sample_data_click (e) {
+    var el           = $(this);
+
+    if (!el.data(data_content))
+        return false;
+
+    /* prevent too fast clicks */
+    if (sample_data_click.active) {
+      return false;
+    }
+
+    sample_data_click.active = true;
+    var keys                 = new Array();
+    var input                = next_free_input(el);
+
+    if (!input)
+      return sample_data_click.active = false;
+
+    var data_content = 'key';
+
+    if (!input)
+      return sample_data_click.active = false;
+
+    while (el.data(data_content)) {
+      keys.push(el.data(data_content));
+      el = el.parents('.ui-collapsible:first');
+    }
+
+    var value = keys.reverse();
+    $(input)
+      .val(value[value.length-1])
+      .trigger('change');
+    $(input)
+      .parent()
+      .next()
+      .find('input')
+      .val(value.join('.'))
+      .trigger('change');
+    $(this).remove();
+    window.setTimeout(function(){
+      sample_data_click.active = false;
+    }, 500);
+
+    /* search an empty input field. if not exist, add new one */
+    function next_free_input (el) {
+      var input   = $('input#' + el.data('input'));
+
+      if (!input || input.length < 1)
+        return null;
+
+      var name    = input.attr('name');
+      var wrapper = $(input).parents('.add-remove:first');
+
+      input = wrapper.find('input[name="' + name + '"][value=""]:first');
+      if (input.val() == '')
+        return input;
+      wrapper.find('button.add').click();
+
+      input = wrapper.find('input[name="' + name + '"][value=""]:first');
+
+      if (input.val() == '')
+        return input;
+      return false;
+    }
+  }
+  $('#sample_data .tree a').live('click.sample_data', sample_data_click);
+  $('#sample_data a.tablink').live('click.tablink', function(e) {
+    e.preventDefault();
+    e.stopPropagation();
+    $('#sample_data .tree').hide();
+    var selector = $(this).attr('href');
+    $(selector).show();
+  });
+
+
+  $('input, select, textarea').each(function(){
+      $(this).data('original_val', $(this).val());
+    }).live('change', function(){
+      if ($(this).val() != $(this).data('original_val')) {
+        reload_code_preview();
+        try {
+          $("#button-save").button('enable');
+        } catch (e) {}
+        $('#button-execute, #button-delete').addClass('ui-disabled');
+      } else {
+        try {
+          $("#button-save").button('disable');
+        } catch (e) {}
+        $('#button-execute, #button-delete').removeClass('ui-disabled');
+      }
+    });
+
+    function reload_code_preview () {
+      var form = $('form#builder_form');
+      if (form.length < 1)
+          return;
+
+      var data = form.serialize();
+      $.post(form.attr('action') + '/code', data, function(data) {
+        $('#code_map').val(data);
+      });
+    }
+});

data/lib/marbu/server/views/_builder_col_code.haml

@@ -0,0 +1,8 @@
+%a{:data => {:role => 'button', :type => 'pulldown'}} Your Javascript-Code
+.clearfix.row.pulldown
+  %label{:for => "code"} Your Javascript-Code:
+  %textarea{:type =>  "text", :name => "#{type}_code", :class => "text", :rows => 10, :cols => 50}= user_code.text
+%a{:data => {:role => 'button', :type => 'pulldown'}} MR-Code for #{type}
+.clearfix.row.pulldown
+  %label{:for => "code_#{type}"} MR-Code for #{type}:
+  %textarea{:type => "text", :name => "key1", :class => "text", :rows => 10, :cols => 50, :readonly => 'readonly', :id => "code_#{type}"}= generated_code

data/lib/marbu/server/views/_builder_col_emit_keys.haml

@@ -0,0 +1,13 @@
+- if not type.eql?('reduce')
+  %a{:data => {:role => 'button', :type => 'pulldown'}} Emit-Keys/Emit-Key-Functions
+  - emit_keys.each_with_index do |key, i|
+    .add-remove.pulldown
+      .clearfix.row.add-remove-element
+        %div.pair
+          %label{:for => "#{type}_key_#{i}"} Emit-Key:
+          %input{:type =>  "text", :name => "#{type}_key_name[]", :class => "text", :value => key.name, :id => "#{type}_key_#{i}"}
+          %a{:href => "/builder/sample_data/#{params[:uuid]}/#{type}_key_#{i}", :class => 'sample_data', :data => {:rel => 'dialog', :transition => 'flip', :corners => 'true', :shadow => 'true', :wrapperels => 'span', :role => 'button', :inline => 'true'}}
+            = 'Sample Data'
+        %div.pair
+          %label{:for => "#{type}_key_function_#{i}"} Emit-Key-Function:
+          %input{:type =>  "text", :name => "#{type}_key_function[]", :class => "text", :value => key.function, :id => "#{type}_key_function_#{i}"}

data/lib/marbu/server/views/_builder_col_emit_values.haml

@@ -0,0 +1,12 @@
+%a{:data => {:role => 'button', :type => 'pulldown'}} Emit-Values/Emit-Functions
+.add-remove.pulldown
+  - emit_values.each_with_index do |value, i|
+    .clearfix.row.add-remove-element
+      .pair
+        %label{:for => "#{type}_value_#{i}"} Emit-Value:
+        %input{:type =>  "text", :name => "#{type}_value_name[]", :class => "text", :value => value.name, :id => "#{type}_value_#{i}"}
+        %a{:href => "/builder/sample_data/#{params[:uuid]}/#{type}_value_#{i}", :class => 'sample_data', :data => {:rel => 'dialog', :transition => 'flip', :corners => 'true', :shadow => 'true', :wrapperels => 'span', :role => 'button', :inline => 'true'}}
+          = 'Sample Data'
+      .pair
+        %label{:for => "#{type}_value_function_#{i}"} Emit-Value-Function:
+        %input{:type =>  "text", :name => "#{type}_value_function[]", :class => "text", :value => value.function, :id => "#{type}_value_function_#{i}"}

data/lib/marbu/server/views/_builder_data_samples.haml

@@ -0,0 +1,8 @@
+- if data_samples.present?
+  %a{:data => {:role => 'button', :type => 'pulldown'}} Sample Data
+  .pulldown
+    - data_samples.each_with_index do |document, i|
+      .clearfix.row
+        .pair
+          %ul{:data => {:role => 'listview'}}
+            = document_list(document)

data/lib/marbu/server/views/_builder_misc.haml

@@ -0,0 +1,20 @@
+%div{:id => 'misc', :data => {:role => 'page', :title => "Settings"}}
+  = haml :_header_col, :layout => false, :locals => {:title => @mrm.new? ? "New map reduce" : @mrm.name }
+  %div{:data => {:role => 'content'}}
+    %h2 Settings
+    .clearfix.row.add-remove-element
+      .pair
+        %label{:for => "name"} Name:
+        %input{:type =>  "text", :name => "name", :class => "text", :value => @mrm.name, :id => "name"}
+      .pair
+        %label{:for => "database"} Database
+        %input{:type =>  "text", :name => "database", :class => "text", :value => @mrf.misc.database, :id => "database"}
+      .pair
+        %label{:for => "input_collection"} Input Collection:
+        %input{:type =>  "text", :name => "input_collection", :class => "text", :value => @mrf.misc.input_collection, :id => "input_collection"}
+      .pair
+        %label{:for => "output_collection"} Output Collection:
+        %input{:type =>  "text", :name => "output_collection", :class => "text", :value => @mrf.misc.output_collection, :id => "output_collection"}
+    - if @mrm.new?
+      %a{:href => "#main", :data => {:role => "button", :icon => 'arrow-r', :iconpos => "right"}} Continue
+  = haml :_footer, :layout => false

data/lib/marbu/server/views/_footer.haml

@@ -0,0 +1,2 @@
+.footer{:data=>{:role => 'footer'}}
+  %h4 © Marbu

data/lib/marbu/server/views/_header.haml

@@ -0,0 +1,3 @@
+%div.header{:data=>{:role => 'header'}}
+  %h1= title || 'Marbu(h)'
+  %a{:href => '/builder/new#misc', :data => {:transition => 'slide', :ajax => 'false', :icon => 'plus'}, :class => "ui-btn-right"} New

data/lib/marbu/server/views/_header_col.haml

@@ -0,0 +1,6 @@
+%div.header{:data=>{:position=>'fixed', :role => 'header'}}
+  - if defined?(show_home)
+    %a{ :href => "/", :data => {:role => "button", :icon => "home", :ajax => 'false'}, :class => 'ui-btn-left'} Home
+  - else
+    %a{ :href => "#main", :data => {:role => "button", :icon => "grid", :transition => 'reverse slide'}, :class => 'ui-btn-left'} Main
+  %h1= title

data/lib/marbu/server/views/builder.haml

@@ -0,0 +1,37 @@
+%form{:id => "builder_form", :action =>  @mrm.new? ? '/builder' : "/builder/#{@mrm.uuid}", :method => "post", :class => 'builder', :data => {:transition => 'none', :ajax => 'false'}}
+  - unless @mrm.new?
+    %input{:type => "hidden", :name => "_method", :value => "put"}
+  %div{:id => 'main', :data => {:role => 'page', :title => @mrm.new? ? "New map reduce object" : @mrm.name}}
+    = haml :_header_col, :layout => false, :locals => {:title => @mrm.new? ? "New map reduce object" : @mrm.name, :show_home => true}
+    %div{:data => {:role => 'content'}}
+      %ul{:data => {:role => 'listview'}}
+        %li
+          %a{:href => "#misc", :data => {:transition => 'slide'}} Settings
+        - ["map", "reduce", "finalize"].each do |type|
+          %li
+            %a{:href => "##{type}", :data => {:transition => 'slide'}}=type.capitalize
+      .row.submit.save_and_back
+        %button{:id => 'button-save', :type => "submit", :value => "Save", :class => "button", :data => {:icon => 'check'}} Save
+        %a{:id => 'button-execute', :href => "/mapreduce/#{@mrm.uuid}", :data => {:transition => 'slide', :role => 'button', :icon => 'search'}, :class =>  @mrm.new? ? "ui-disabled" : nil } Execute
+        %a{:id => 'button-delete', :href => "/builder/#{@mrm.uuid}/delete", :class =>  @mrm.new? ? "ui-disabled delete" : "delete", :data => {:ajax => 'false', :role => 'button', :icon => 'delete'}} Delete
+
+    = haml :_footer, :layout => false
+
+  - ["map", "reduce", "finalize"].each do |type|
+    %div.col{:id => type, :data => {:role => 'page', :title => @mrm.new? ? "New map reduce object" : @mrm.name}}
+      = haml :_header_col, :layout => false, :locals => {:title => @mrm.new? ? "New map reduce object" : @mrm.name }
+      %div{:data => {:role => 'content'}}
+        %h2= type.capitalize
+        .builder
+          = haml :_builder_col_emit_keys, :locals => {:type => type, :emit_keys => @mrf.send(type.to_sym).keys}
+          = haml :_builder_col_emit_values, :locals => {:type => type, :emit_values => @mrf.send(type.to_sym).values}
+          = haml :_builder_col_code, :locals => {:type => type, :user_code => @mrf.send(type.to_sym).code, :generated_code => Marbu::Builder.new(@mrf).send(type.to_sym)}
+      = haml :_footer, :layout => false
+
+  = haml :_builder_misc, :layout => false
+
+- unless @mrm.new?
+  :javascript
+  $(function() {
+    setTimeout(function() {$("#button-save").button("disable");}, 100);
+  });

data/lib/marbu/server/views/layout.haml

@@ -0,0 +1,19 @@
+<!DOCTYPE html>
+%html(lang="en")
+  %head
+    %meta(charset="utf-8")
+    - if @description
+      %meta(name="description" content=@description)
+    - if @keywords
+      %meta(name="keywords" content=@keywords)
+    %meta(name='viewport' content='width=device-width, initial-scale=1')
+    %title= @title
+    %script(src='http://code.jquery.com/jquery-1.6.4.min.js')
+    %script(src='http://code.jquery.com/ui/jquery-ui-git.js')
+    %script(src='/js/builder.js')
+    %script(src='http://code.jquery.com/mobile/1.0.1/jquery.mobile-1.0.1.min.js')
+    %link(href='/css/style.css' rel='stylesheet' type='text/css')
+    %link(href='http://code.jquery.com/mobile/1.0.1/jquery.mobile-1.0.1.min.css' rel='stylesheet' type='text/css')
+  %body
+    #container
+      = yield

data/lib/marbu/server/views/mapreduce.haml

@@ -0,0 +1,9 @@
+%div{:data => {:role => 'content'}}
+  - if @error.present?
+    = @error.to_s
+    %a{:href => @fix_link, :data => {:transition => 'slide', :role => 'button'}}= 'Fix it'
+  - else
+    %textarea{:type => "text", :name => "key1", :class => "text", :rows => 10, :cols => 100}= @res.find().to_a.inspect
+    %input{:type => "submit", :value => "Save", :class => "button"}
+
+  %a{:href => "/builder/#{@mrm.uuid}", :data => {:transition => 'slide', :role => 'button'}}= 'Back'

data/lib/marbu/server/views/root.haml

@@ -0,0 +1,11 @@
+%div{:id => 'root', :data => {:role => 'page'}}
+  = haml :_header, :layout => false, :locals => { :title => "Listing map reduce objects" }
+  %div{:data => {:role => 'content'}}
+    %ul{:data => {:role => 'listview'}}
+      - @mrms.each do |mrf|
+        - uuid = mrf.uuid
+        - name = mrf.name
+        %li
+          %a{:href => '/builder/' + uuid, :data => {:transition => 'slide', :ajax => 'false'}}=name.capitalize
+
+  = haml :_footer, :layout => false

data/lib/marbu/server/views/sample_data.haml

@@ -0,0 +1,17 @@
+%div#sample_data{:data => {:role => 'dialog'}}
+  %div{:data => {:role => 'header'}}
+    %h1='Sample data'
+
+  %div{:data => {:role => 'content'}}
+    - if @data_samples.present?
+      %a{:href => "#sample_data_param_1", :class => 'tablink', :data => {:role => 'button'}}
+        Param 1
+      %a{:href => "#sample_data_param_2", :class => 'tablink', :data => {:role => 'button'}}
+        Param 2
+      - @data_samples.each_with_index do |document, i|
+        %div.tree{:id => "sample_data_param_#{i+1}"}
+          %h3="param_#{i+1}"
+          = sample_data_tree(document, params[:input_id])
+
+    %a{:data => {:rel => 'back', :role => 'button'}}
+      ='Back'

data/lib/marbu/server.rb

@@ -0,0 +1,199 @@
+# -*- encoding: utf-8 -*-
+
+require 'sinatra/base'
+require 'sinatra/reloader'
+require 'haml'
+require 'time'
+require 'marbu'
+require 'uuid'
+
+module Marbu
+  class Server < Sinatra::Base
+    configure :development do
+      require 'ruby-debug'
+      enable :logging, :dump_errors, :raise_errors
+      register Sinatra::Reloader
+    end
+
+    enable :method_override
+
+    dir = File.dirname(File.expand_path(__FILE__))
+    set :views, "#{dir}/server/views"
+    set :public_folder, "#{dir}/server/public"
+    set :static, true
+
+    helpers do
+      def url_path(*path_parts)
+        [ path_prefix, path_parts ].join("/").squeeze('/')
+      end
+      alias_method :u, :url_path
+
+      def path_prefix
+        request.env['SCRIPT_NAME']
+      end
+
+      def document_list(document)
+        document.inject("") do |html, (key, value)|
+          if( value.is_a?(Hash) )
+            html += "<li>#{key}<ul>#{document_list(value)}</ul></li>"
+          else
+            html += "<li>#{key}: #{value}</li>"
+          end
+        end
+      end
+
+      def sample_data_tree(document, input_id)
+        document.inject('') do |html, (key, value)|
+          if (value.is_a?(Hash))
+            html += '<div data-role="collapsible" data-collapsed="true" data-key="' + key + '">'
+            html += '<h3> ' + key + '</h3>'
+            html += sample_data_tree(value, input_id)
+            html +='</div>'
+          else
+            html += '<a data-role="button" data-type="sample_data" data-input="' + input_id + '" data-key="' + key + '" data-value="' + value.to_s + '">'
+            html += key.to_s
+            html += '<span class="example">(example: ' + value.to_s + ')</span>';
+            html += '</a>';
+          end
+        end
+      end
+
+    end
+
+    get "/" do
+      @mrms = Marbu::Models::Db::MongoDb.all
+      show 'root'
+    end
+
+    get "/builder/new" do
+      @mrm              = Marbu::Models::Db::MongoDb.new
+      @mrf              = @mrm.map_reduce_finalize
+      show 'builder'
+    end
+
+    get '/builder/sample_data/:uuid/:input_id' do
+      @mrm          = Marbu::Models::Db::MongoDb.first(conditions: {uuid: params['uuid']})
+      @mrf          = @mrm.map_reduce_finalize
+      @data_samples = Marbu::Models::Db::MongoDb::Structure.get_first_and_last_document(@mrf.misc)
+      show 'sample_data'
+    end
+
+    post "/builder" do
+      @mrm                  = build_mrm_from_params(params.merge({:logger => logger}))
+      @mrm.save!
+      redirect "/builder/#{@mrm.uuid}"
+    end
+
+    get "/builder/:uuid" do
+      @mrm          = Marbu::Models::Db::MongoDb.first(conditions: {uuid: params['uuid']})
+      @mrf          = @mrm.map_reduce_finalize
+      @data_samples = Marbu::Models::Db::MongoDb::Structure.get_first_and_last_document(@mrf.misc)
+
+      show 'builder'
+    end
+
+    put "/builder/:uuid" do
+      @mrm                  = build_mrm_from_params(params.merge({:logger => logger}))
+      @mrm.save!
+      redirect "/builder/#{@mrm.uuid}"
+    end
+
+    delete "/builder/:uuid" do
+      @mrm = Marbu::Models::Db::MongoDb.first(conditions: {uuid: params['uuid']})
+      @mrm.destroy if @mrm.present?
+      redirect "/"
+    end
+
+    get "/mapreduce/:uuid" do
+      @mrm         = Marbu::Models::Db::MongoDb.first(conditions: {uuid: params['uuid']})
+      @mrf         = @mrm.map_reduce_finalize
+      @builder     = Marbu::Builder.new(@mrf)
+      @error      = nil
+
+      begin
+        # TODO: naturally this has to take the DATABASE and COLLECTION from the mapreducefilter object
+        # TODO: don;t take the parameters from the mapreducefilter object if DATABASE or DATABASE and COLLECTION are
+        # TODo: defined in the configuration (security)
+        @res = @mrf.misc.collection.map_reduce( @builder.map(:mongodb), @builder.reduce(:mongodb),
+                                                {
+                                                    :query  => @builder.query,
+                                                    :out    => {:replace => "tmp."+@mrm.map_reduce_finalize.misc.output_collection},
+                                                    :finalize => @builder.finalize(:mongodb)
+                                                }
+        )
+      rescue Mongo::OperationFailure => e
+        @parsed_error = Marbu::Models::Db::MongoDb::Exception.explain(e, @mrf)
+        @error        = @parsed_error[:message]
+        @fix_link     = Marbu::Models::ExceptionLink.get_exception_fix_link(@parsed_error[:id], params['uuid'])
+      end
+
+      show 'mapreduce'
+    end
+
+    def build_mrm_from_params(params)
+      name                      = 'name'
+      function                  = 'function'
+
+      if (uuid = params['uuid'])
+        mrm                       = Marbu::Models::Db::MongoDb.find_or_create_by(uuid: uuid)
+      else
+        mrm = Marbu::Models::Db::MongoDb.new
+      end
+      mrm.name                  = params['name']
+      mrf                       = mrm.map_reduce_finalize
+
+      mrf.map                   = Marbu::Models::Map.new(
+          :code => {:text => params['map_code']}
+      )
+      mrf.reduce                = Marbu::Models::Reduce.new(
+          :code => {:text => params['reduce_code']}
+      )
+      mrf.finalize              = Marbu::Models::Finalize.new(
+          :code => {:text => params['finalize_code']}
+      )
+      mrf.query                 = Marbu::Models::Query.new(
+          :condition    => params['query_condition'],
+          :force_query  => params['query_force_query']
+      )
+      mrf.misc                  = Marbu::Models::Misc.new(
+          :database           => params['database'],
+          :input_collection   => params['input_collection'],
+          :output_collection  => params['output_collection']
+      )
+
+      # add params to map_new, reduce_new, finalize_new
+      ['map', 'reduce', 'finalize'].each do |stage|
+        ['key', 'value'].each do |type|
+          stage_type_name       = params["#{stage}_#{type}_#{name}"]
+          stage_type_function   = params["#{stage}_#{type}_#{function}"]
+
+          if( stage_type_name.present?)
+            stage_type_name.each_with_index do |n, i|
+              case stage
+                when 'map'      then add(mrf.map, type, n, stage_type_function[i])
+                when 'reduce'   then add(mrf.reduce, type, n, stage_type_function[i])
+                when 'finalize' then add(mrf.finalize, type, n, stage_type_function[i])
+                else raise Exception.new("#{stage} in #{k} is unknown")
+              end
+            end
+          end
+        end
+      end
+
+      mrm.map_reduce_finalize = mrf
+      return mrm
+    end
+
+    def add(model, type, name, function)
+      case type
+        when 'key'      then model.add_key(name, function)
+        when 'value'    then model.add_value(name, function)
+        else raise Exception.new("#{type} is unknown")
+      end
+    end
+
+    def show(page)
+      haml page.to_sym
+    end
+  end
+end