card 1.99.4 → 1.99.5

data/tmpsets/set/mod016-standard/all/rich_html/modal.rb

@@ -0,0 +1,58 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class All; module RichHtml; module Modal; extend Card::Set
+# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/all/rich_html/modal.rb ~~
+format :html do
+  view :modal_link do |args|
+    path_opts = args[:path_opts] || {}
+    path_opts[:layout] = :modal
+    html_args = args[:html_args] || {}
+    html_args["data-target"] = "#modal-main-slot"
+    html_args["data-toggle"] = "modal"
+    link_to(args[:text] || _render_title(args), path(path_opts), html_args)
+  end
+
+  view :modal_slot, tags: :unknown_ok do |args|
+    id = "modal-#{args[:modal_id] || 'main-slot'}"
+    dialog_args = { class: "modal-dialog" }
+    add_class dialog_args, args[:dialog_class]
+    wrap_with(:div, class: "modal fade", role: "dialog", id: id) do
+      wrap_with(:div, dialog_args) do
+        content_tag :div, class: "modal-content" do
+          ""
+        end
+      end
+    end
+  end
+
+  view :modal_menu, tags: :unknown_ok do
+    popout_params = {}
+    popout_params[:view] = params[:view] if params[:view]
+    # we probably want to pass on a lot more params than just view,
+    # but not all of them
+    # (eg we don't want layout, id, controller...)
+    wrap_with :div, class: "modal-menu" do
+      [
+        link_to(glyphicon("remove"), "",
+                class: "close-modal pull-right close",
+                "data-dismiss" => "modal"),
+        link_to(glyphicon("new-window"), popout_params,
+                class: "pop-out-modal pull-right close ")
+      ]
+    end
+  end
+
+  view :modal_footer, tags: :unknown_ok do |args|
+    args[:buttons] || ""
+  end
+
+  def default_modal_footer_args args
+    args[:buttons] ||=
+      button_tag "Close",
+                 class: "btn-xs close-modal pull-right",
+                 "data-dismiss" => "modal"
+  end
+end
+
+
+# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/all/rich_html/modal.rb ~~
+end;end;end;end;end;

data/tmpsets/set/mod016-standard/all/rich_html/toolbar.rb

@@ -0,0 +1,312 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class All; module RichHtml; module Toolbar; extend Card::Set
+# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/all/rich_html/toolbar.rb ~~
+format :html do
+  def toolbar_pinned?
+    (tp = Card[:toolbar_pinned]) && tp.content == "true"
+  end
+
+  view :toolbar do |args|
+    collapsed = close_link(args.merge(class: "pull-right visible-xs"))
+    navbar "toolbar-#{card.cardname.safe_key}-#{args[:home_view]}",
+           toggle_align: :left, class: "slotter toolbar",
+           navbar_type: "inverse",
+           collapsed_content: collapsed do
+      [
+        close_link(args.merge(class: "hidden-xs navbar-right")),
+        (wrap_with(:form, class: "navbar-form navbar-left") do
+          [
+            (account_split_button(args) if card.accountable?),
+            activity_split_button(args),
+            rules_split_button(args),
+            edit_split_button(args)
+          ]
+        end),
+        (wrap_with(:form, class: "navbar-form navbar-right") do
+          content_tag :div, class: "form-group" do
+            _optional_render(:toolbar_buttons, args, :show)
+          end
+        end)
+      ]
+    end
+  end
+
+  def default_toolbar_args args
+    args[:nested_fields] = nested_fields(args)
+    args[:active_toolbar_button] ||= active_toolbar_button @slot_view, args
+  end
+
+  def active_toolbar_button active_view, args
+    case active_view
+    when :follow, :editors, :history
+      "activity"
+    when :edit_rules, :edit_nest_rules
+      "rules"
+    when :edit, :edit_name, :edit_type, :edit_structure, :edit_nests
+      "edit"
+    when :related
+      if args[:related_card] && (tag = args[:related_card].tag)
+        case tag.codename
+        when "discussion", "editors"
+          "engage"
+        when "account", "roles", "edited", "created", "follow"
+          "account"
+        when "structure"
+          "edit"
+        else
+          "rules"
+        end
+      end
+    end
+  end
+
+  TOOLBAR_TITLE = {
+    edit: "content", edit_name: "name", edit_type: "type",
+    edit_structure: "structure", edit_nests: "nests", history: "history",
+    common_rules: "common", recent_rules: "recent", grouped_rules: "all",
+    edit_nest_rules: "nests"
+  }.freeze
+
+  def toolbar_view_title view
+    if view == :edit_rules
+      current_set_card.name
+    else
+      TOOLBAR_TITLE[view]
+    end
+  end
+
+  def activity_split_button args
+    discuss = smart_link "discuss",  related: Card[:discussion].key
+    editors = smart_link "editors",  related: Card[:editors].key
+    toolbar_split_button "activity", { view: :history }, args do
+      {
+        history:    (_render_history_link if card.history?),
+        discuss: discuss,
+        follow:  _render_follow_link(args),
+        editors: editors
+      }
+    end
+  end
+
+  def rules_split_button args
+    recent = smart_link "recent",   view: :edit_rules,
+                                    slot: { rule_view: :recent_rules }
+    common = smart_link "common",   view: :edit_rules,
+                                    slot: { rule_view: :common_rules }
+    group  = smart_link "by group", view: :edit_rules,
+                                    slot: { rule_view: :grouped_rules }
+    all    = smart_link "by name",  view: :edit_rules,
+                                    slot: { rule_view: :all_rules }
+    nests  = smart_link "nests",    view: :edit_nest_rules,
+                                    slot: { rule_view: :field_related_rules }
+    toolbar_split_button "rules",   { view: :edit_rules }, args do
+      {
+        common_rules:    common,
+        grouped_rules:   group,
+        all_rules:       all,
+        separator:       (separator if args[:nested_fields].present?),
+        recent_rules:    (recent if recently_edited_settings?),
+        edit_nest_rules: (nests if args[:nested_fields].present?)
+      }
+    end
+  end
+
+  def edit_split_button args
+    toolbar_split_button "edit", { view: :edit }, args do
+      {
+        edit:       _render_edit_content_link(args),
+        edit_nests: (_render_edit_nests_link if nests_editable?(args)),
+        structure:  (_render_edit_structure_link if structure_editable?),
+        edit_name:  _render_edit_name_link,
+        edit_type:  _render_edit_type_link
+      }
+    end
+  end
+
+  def nests_editable? args
+    !card.structure && args[:nested_fields].present?
+  end
+
+  def account_split_button args
+    toolbar_split_button "account", { related: Card[:account].key }, args do
+      {
+        account: smart_link("details",
+                            related: {
+                              name: "#{card.name}+#{Card[:account].key}",
+                              view: :edit }
+                           ),
+        roles:   smart_link("roles", related: Card[:roles].key),
+        created: smart_link("created", related: Card[:created].key),
+        edited:  smart_link("edited", related: Card[:edited].key),
+        follow:  smart_link("follow", related: Card[:follow].key)
+      }
+    end
+  end
+
+  def toolbar_split_button name, button_args, args
+    button =
+      button_link name, button_args,
+                  class: ("active" if args[:active_toolbar_button] == name)
+    active_item =
+      if @slot_view == :related
+        if args[:rule_view]
+          args[:rule_view].to_sym
+        elsif args[:related_card] && (r = args[:related_card].right) &&
+              (cn = r.codename)
+          cn.to_sym
+        end
+      else
+        @slot_view
+      end
+    split_button button, args.merge(active_item: active_item) do
+      yield
+    end
+  end
+
+  def close_link args
+    link_opts = { title: "cancel",
+                  class: "btn-toolbar-control btn btn-primary" }
+    link_opts[:path_opts] = { slot: { subframe: true } } if args[:subslot]
+    link = view_link glyphicon("remove"), :home, link_opts
+    css_class = ["nav navbar-nav", args[:class]].compact.join "\n"
+    wrap_with :div, class: css_class do
+      [
+        toolbar_pin_button,
+        link
+      ]
+    end
+  end
+
+  def toolbar_pin_button
+    button_tag glyphicon("pushpin"),
+               situation: :primary, remote: true,
+               title: "#{'un' if toolbar_pinned?}pin",
+               class: "btn-toolbar-control toolbar-pin " \
+                      "#{'in' unless toolbar_pinned?}active"
+  end
+
+  view :toolbar_buttons do |args|
+    show_or_hide_delete = card.ok?(:delete) ? :show : :hide
+    wrap_with(:div, class: "btn-group") do
+      [
+        _optional_render(:delete_button,  args, show_or_hide_delete),
+        _optional_render(:refresh_button, args, :show),
+        _optional_render(:related_button, args, :show),
+        _optional_render(:history_button, args, :hide)
+      ]
+    end
+  end
+
+  view :related_button do |_args|
+    path_opts = { slot: { show: :toolbar } }
+    dropdown_button "", icon: "education", class: "related" do
+      [
+        menu_item(" children",       "baby-formula",
+                  path_opts.merge(related: "*children")),
+        menu_item(" mates",          "bed",
+                  path_opts.merge(related: "*mates")),
+        menu_item(" references out", "log-out",
+                  path_opts.merge(related: "*refers_to")),
+        menu_item(" references in",  "log-in",
+                  path_opts.merge(related: "*referred_to_by"))
+      ]
+    end
+  end
+  view :refresh_button do |_args|
+    path_opts = { slot: { show: :toolbar }, page: card }
+    icon = main? ? "refresh" : "new-window"
+    toolbar_button "refresh", icon, "hidden-xs hidden-sm hidden-md hidden-lg",
+                   path_opts: path_opts
+  end
+
+  view :delete_button do |_args|
+    toolbar_button(
+      "delete", "trash", "hidden-xs hidden-sm hidden-md hidden-lg",
+      action: :delete,
+      class: "slotter",
+      remote: true,
+      path_opts: {
+        success: main? ? "REDIRECT: *previous" : "TEXT: #{card.name} deleted"
+      },
+      :'data-confirm' => "Are you sure you want to delete #{card.name}?"
+    )
+  end
+
+  def toolbar_button text, symbol, hide=nil, tag_args={}
+    hide ||= "hidden-xs hidden-sm hidden-md hidden-lg"
+    tag_args[:class] = [tag_args[:class], "btn btn-primary"].compact * " "
+    tag_args[:title] ||= text
+    link_text =
+      glyphicon(symbol) +
+      content_tag(:span, text.html_safe, class: "menu-item-label #{hide}")
+
+    if (cardname = tag_args.delete(:page))
+      card_link cardname, class: klass, text: link_text
+    elsif (viewname = tag_args.delete(:view))
+      tag_args[:path_opts] ||= { slot: { show: :toolbar } }
+      view_link link_text, viewname, tag_args
+    else
+      path_opts = tag_args.delete(:path_opts) || {}
+      path_opts[:action] = tag_args.delete(:action) if tag_args[:action]
+      link_to link_text, path_opts, tag_args
+    end
+  end
+
+  def autosaved_draft_link
+    view_link "autosaved draft", :edit,
+              path_opts: { edit_draft: true, slot: { show: :toolbar } },
+              class: "navbar-link slotter pull-right"
+  end
+
+  def default_edit_content_link_args args
+    args[:title] ||= "content"
+  end
+  view :edit_content_link do |args|
+    toolbar_view_link :edit, args
+  end
+
+  def default_edit_name_link_args args
+    args[:title] ||= "name"
+  end
+  view :edit_name_link do |args|
+    toolbar_view_link :edit_name, args
+  end
+
+  def default_edit_type_link_args args
+    args[:title] ||= "type"
+  end
+  view :edit_type_link do |args|
+    toolbar_view_link :edit_type, args
+  end
+
+  view :edit_structure_link do |_args|
+    smart_link "structure", view: :edit_structure
+  end
+
+  def default_history_link_args args
+    args[:title] ||= "history"
+  end
+  view :history_link do |args|
+    toolbar_view_link :history, args
+  end
+
+  def default_edit_nests_link_args args
+    args[:title] ||= "nests"
+  end
+  view :edit_nests_link do |args|
+    toolbar_view_link :edit_nests, args
+  end
+
+  def toolbar_view_link view, args
+    text = args.delete(:title)
+    view_link text, view, args
+  end
+
+  def recently_edited_settings?
+    (rs = Card[:recent_settings]) && rs.item_names.present?
+  end
+end
+
+
+# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/all/rich_html/toolbar.rb ~~
+end;end;end;end;end;

data/tmpsets/set/mod016-standard/all/rich_html/wrapper.rb

@@ -0,0 +1,191 @@
+# -*- encoding : utf-8 -*-
+class Card; module Set; class All; module RichHtml; module Wrapper; extend Card::Set
+# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/all/rich_html/wrapper.rb ~~
+format :html do
+  def slot_options args
+    @@slot_option_keys ||=
+      Card::Content::Chunk::Include.options
+                                   .reject { |k| k == :view }
+                                   .unshift :home_view
+    options_hash = {}
+
+    if @context_names.present?
+      options_hash["name_context"] = @context_names.map(&:key) * ","
+    end
+
+    options_hash[:subslot] = "true" if args[:subslot]
+
+    @@slot_option_keys.each_with_object(options_hash) do |opt, hash|
+      hash[opt] = args[opt] if args[opt].present?
+    end
+
+    JSON(options_hash)
+  end
+
+  # Does two main things:
+  # (1) gives CSS classes for styling and
+  # (2) adds card data for javascript - including the "card-slot" class,
+  #     which in principle is not supposed to be in styles
+  def wrap args={}
+    @slot_view = @current_view
+    classes = wrap_classes args
+    data = wrap_data args
+
+    div = content_tag :div, output(yield).html_safe,
+                      id: card.cardname.url_key,
+                      class: classes,
+                      data: data,
+                      style: h(args[:style])
+    add_debug_comments div
+  end
+
+  def add_debug_comments content
+    return content if params[:debug] != "slot" ||
+                      tagged(@current_view, :no_wrap_comments)
+    name = h card.name
+    space = "  " * @depth
+    "<!--\n\n#{space}BEGIN SLOT: #{name}\n\n-->" \
+    "#{div}" \
+    "<!--\n\n#{space}END SLOT: #{name}\n\n-->"
+  end
+
+  def wrap_classes args
+    [
+      ("card-slot" unless args[:no_slot]),
+      "#{@current_view}-view",
+      (args[:slot_class] if args[:slot_class]),
+      ("STRUCTURE-#{args[:structure].to_name.key}" if args[:structure]),
+      card.safe_set_keys
+    ].compact.join " "
+  end
+
+  def wrap_data args
+    {
+      "card-id" => card.id,
+      "card-name" => h(card.name),
+      "slot"      => html_escape_except_quotes(slot_options(args))
+    }
+  end
+
+  def wrap_body args={}
+    css_classes = ["card-body"]
+    css_classes << args[:body_class]                      if args[:body_class]
+    css_classes += ["card-content", card.safe_set_keys] if args[:content]
+    content_tag :div, class: css_classes.compact * " " do
+      yield args
+    end
+  end
+
+  def panel args={}
+    wrap_with :div, class: "card-frame #{args[:panel_class]}" do
+      output(yield)
+    end
+  end
+
+  def frame args={}, &block
+    if args[:subframe]
+      args.delete(:panel_class)
+      subframe args, &block
+    else
+      show_subheader =
+        show_view?(:toolbar, args.merge(default_visibility: :hide)) &&
+        @current_view != :related && @current_view != :open
+
+      wrap args do
+        [
+          _optional_render(:menu, args),
+          panel(args) do
+            [
+              _optional_render(:header, args, :show),
+              _optional_render(:subheader, args,
+                               (show_subheader ? :show : :hide)),
+              _optional_render(:help,
+                               args.merge(help_class: "alert alert-info"),
+                               :hide),
+              wrap_body(args) { output(yield(args)) }
+            ]
+          end
+        ]
+      end
+    end
+  end
+
+  def subframe args={}
+    wrap args do
+      [
+        _optional_render(:menu, args.merge(optional_horizontal_menu: :hide)),
+        _optional_render(:subheader, args, :show),
+        _optional_render(:help, args.merge(help_class: "alert alert-info"),
+                         :hide),
+        panel(args) do
+          [
+            _optional_render(:header, args, :hide),
+            wrap_body(args) { output(yield args) }
+          ]
+        end
+      ]
+    end
+  end
+
+  def frame_and_form action, args={}, form_opts={}
+    form_opts.merge! args.delete(:form_opts) if args[:form_opts]
+    form_opts[:hidden] = args.delete(:hidden) if args[:hidden]
+    frame args do
+      card_form action, form_opts do
+        output(yield args)
+      end
+    end
+  end
+
+  # alert_types: 'success', 'info', 'warning', 'danger'
+  def alert alert_type, args={}
+    css_class = "alert alert-#{alert_type} "
+    css_class += "alert-dismissible " if args[:dismissible]
+    css_class += args[:alert_class] if args[:alert_class]
+    close_button =
+      if args[:dismissible]
+        <<-HTML
+          <button type="button" class="close" data-dismiss="alert"
+                  aria-label="Close">
+            <span aria-hidden="true">&times;</span>
+          </button>
+        HTML
+      else
+        ""
+      end
+    content_tag :div, class: css_class, role: "alert" do
+      close_button + output(yield args)
+    end
+  end
+
+  def wrap_main content
+    return content if Env.ajax? || params[:layout] == "none"
+    %(<div id="main">#{content}</div>)
+  end
+
+  def wrap_with tag, content_or_args={}, html_args={}
+    if block_given?
+      content_tag(tag, content_or_args) do
+        output(yield).html_safe
+      end
+    else
+      content_tag(tag, html_args) do
+        output(content_or_args).html_safe
+      end
+    end
+  end
+
+  def wrap_each_with tag, content_or_args={}, args={}
+    content = block_given? ? yield(args) : content_or_args
+    args    = block_given? ? content_or_args : args
+    content.compact.map do |item|
+      wrap_with tag, args do
+        item
+      end
+    end.join "\n"
+  end
+end
+
+
+# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/all/rich_html/wrapper.rb ~~
+end;end;end;end;end;