card 1.21.0 → 1.91

data/tmpsets/set/mod016-standard/all/links.rb

@@ -1,165 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All; module Links; extend Card::Set
-# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/all/links.rb ~~
-format do
-  # link is called by web_link, card_link, and view_link
-  # (and is overridden in other formats)
-  def link_to text, href, _opts={}
-    href = interpret_href href
-
-    if text && href != text
-      "#{text}[#{href}]"
-    else
-      href
-    end
-  end
-
-  # link to url, view, card or related card
-  def smart_link link_text, target, html_args={}
-    if (view = target.delete(:view))
-      view_link link_text, view, html_args.merge(path_opts: target)
-    elsif (page = target.delete(:card))
-      card_link page, html_args.merge(path_opts: target, text: link_text)
-    elsif target[:related]
-      if target[:related].is_a? String
-        target[:related] = { name: "+#{target[:related]}" }
-      end
-      view_link link_text, :related, html_args.merge(path_opts: target)
-    elsif target[:web]
-    else
-      link_to link_text, target, html_args
-    end
-  end
-
-  # link to a specific url or path
-  def web_link href, opts={}
-    text = opts.delete(:text) || href
-    new_class =
-      case href
-      when /^https?\:/
-        opts[:target] = "_blank"
-        "external-link"
-      when /^mailto\:/
-        "email-link"
-      when /^([a-zA-Z][\-+\.a-zA-Z\d]*):/
-        Regexp.last_match(1) + "-link"
-      when /^\//
-        href = internal_url href[1..-1]
-        "internal-link"
-      else
-        return card_link href, opts
-      end
-    add_class opts, new_class
-    link_to text, href, opts
-  end
-
-  # link to a specific card
-  def card_link name_or_card, opts={}
-    name =
-      case name_or_card
-      when Symbol then Card.fetch(name_or_card, skip_modules: true).cardname
-      when Card   then name_or_card.cardname
-      else             name_or_card
-      end
-    text = (opts.delete(:text) || name).to_name.to_show @context_names
-
-    path_opts = opts.delete(:path_opts) || {}
-    path_opts[:name] = name
-    path_opts[:known] =
-      opts[:known].nil? ? Card.known?(name) : opts.delete(:known)
-    add_class opts, (path_opts[:known] ? "known-card" : "wanted-card")
-    link_to text, path_opts, opts
-  end
-
-  # link to a specific view (defaults to current card)
-  # this is generally used for ajax calls
-  def view_link text, view, opts={}
-    path_opts = opts.delete(:path_opts) || {}
-    path_opts[:view] = view unless view == :home
-    opts[:remote] = true
-    opts[:rel] = "nofollow"
-
-    link_to text, path_opts, opts
-  end
-
-  def related_link name_or_card, opts={}
-    name =
-      case name_or_card
-      when Symbol then Card.fetch(name_or_card, skip_modules: true).cardname
-      when Card   then name_or_card.cardname
-      else             name_or_card
-      end
-    opts[:path_opts] ||= { view: :related }
-    opts[:path_opts][:related] = { name: "+#{name}" }
-    opts[:path_opts][:related].merge! opts[:related_opts] if opts[:related_opts]
-    view_link(opts[:text] || name, :related, opts)
-  end
-
-  def path opts={}
-    if opts[:action] == :new && opts[:type] &&
-       !(opts[:name] || opts[:card] || opts[:id])
-      opts.delete(:action)
-      base = "new/#{opts.delete(:type)}"
-    else
-      name = opts.delete(:name) || card.name
-      base = opts[:action] ? "card/#{opts.delete :action}/" : ""
-
-      opts[:no_id] = true if [:new, :create].member? opts[:action]
-      # generalize. dislike hardcoding views/actions here
-
-      linkname = name.to_name.url_key
-      unless name.empty? || opts.delete(:no_id)
-        base += (opts[:id] ? "~#{opts.delete :id}" : linkname)
-      end
-
-      process_path_card_opts opts, name, linkname
-    end
-
-    query = opts.empty? ? "" : "?#{opts.to_param}"
-    internal_url(base + query)
-  end
-
-  def internal_url relative_path
-    card_path relative_path
-  end
-
-  def interpret_href href
-    href.is_a?(Hash) ? path(href) : href
-  end
-
-  def process_path_card_opts opts, name, linkname
-    opts[:card] ||= {}
-    if opts.delete(:known) == false && name.present? && name.to_s != linkname
-      opts[:card][:name] = name
-    end
-
-    if (type = opts.delete(:type)) && Card.known?(type)
-      opts[:card][:type] = type
-    end
-    opts.delete(:card) if opts[:card].empty?
-  end
-end
-
-format :html do
-  def link_to text, href, opts={}
-    href = interpret_href href
-
-    [:remote, :method].each do |key|
-      if (val = opts.delete(key))
-        opts["data-#{key}"] = val
-      end
-    end
-
-    content_tag :a, raw(text), opts.merge(href: href)
-  end
-end
-
-format :css do
-  def link_to _text, href, _opts={}
-    interpret_href href
-  end
-end
-
-
-# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/all/links.rb ~~
-end;end;end;end;

data/tmpsets/set/mod016-standard/all/list_changes.rb

@@ -1,53 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All; module ListChanges; extend Card::Set
-# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/all/list_changes.rb ~~
-# -*- encoding : utf-8 -*-
-
-def list_fields
-  Card.search({ left: name, type_id: Card::ListID }, "list fields")
-end
-
-def listed_by_fields
-  Card.search({ left: name, type_id: Card::ListedByID }, "listed by fields")
-end
-
-def linker_lists
-  Card.search({ type_id: Card::ListID, link_to: name },
-              "lists that link to #{name}")
-end
-
-event :trunk_cardtype_of_a_list_relation_changed, :finalize,
-      changed: :type, on: :update,
-      when: proc { Codename[:list] } do
-  type_key_was = (tk = Card.quick_fetch(type_id_was)) && tk.key
-
-  list_fields.each do |card|
-    card.update_listed_by_cache_for card.item_keys, type_key: type_key_was
-    card.update_listed_by_cache_for card.item_keys
-  end
-  listed_by_fields.each &:update_cached_list
-end
-
-event :trunk_name_of_a_list_relation_changed, :finalize,
-      changed: :name,  on: :update,
-      when: proc { Codename[:list] } do
-  list_fields.each do |card|
-    card.update_listed_by_cache_for card.item_keys
-  end
-  listed_by_fields.each &:update_cached_list
-end
-
-event :cardtype_of_list_item_changed, :validate,
-      changed: :type, on: :save,
-      when: proc { Codename[:list] } do
-  linker_lists.each do |card|
-    next unless card.item_type_id != type_id
-    errors.add(:type,
-               "can't be changed because #{name} " \
-               "is referenced by list card #{card.name}")
-  end
-end
-
-
-# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/all/list_changes.rb ~~
-end;end;end;end;

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

@@ -1,261 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All; module RichHtml; module Content; extend Card::Set
-# ~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/all/rich_html/content.rb ~~
-def show_comment_box_in_related?
-  false
-end
-
-format :html do
-  def show view, args
-    if show_layout?
-      args[:view] = view if view
-      @main_opts = args
-      render :layout
-    else
-      view ||= args[:home_view] || :open
-      @nest_opts = (args[:items] || {}).clone
-      render view, args
-    end
-  end
-
-  def show_layout?
-    !Env.ajax? || params[:layout]
-  end
-
-  view :layout, perms: :none do |args|
-    output [
-      process_content(get_layout_content, content_opts:
-        { chunk_list: :references }),
-      _render_modal_slot(args)
-    ]
-  end
-
-  view :content do |args|
-    wrap args.reverse_merge(slot_class: "card-content") do
-      [
-        _optional_render(:menu, args, :hide),
-        _render_core(args)
-      ]
-    end
-  end
-
-  view :content_panel do |args|
-    wrap args.reverse_merge(slot_class: "card-content panel panel-default") do
-      wrap_with :div, class: "panel-body" do
-        [
-          _optional_render(:menu, args, :hide),
-          _render_core(args)
-        ].join("\n")
-      end
-    end
-  end
-
-  view :titled, tags: :comment do |args|
-    wrap args do
-      [
-        _optional_render(:menu, args),
-        _render_header(args),
-        wrap_body(content: true) { _render_core args },
-        optional_render(:comment_box, args)
-      ]
-    end
-  end
-
-  view :labeled do |args|
-    wrap args do
-      [
-        _optional_render(:menu, args),
-        "<label>#{_render_title args}</label>",
-        wrap_body(body_class: "closed-content", content: true) do
-          _render_closed_content args
-        end
-      ]
-    end
-  end
-
-  view :title do |args|
-    title = fancy_title args[:title], args[:title_class]
-    title =
-      _optional_render(:title_editable, args, :hide) ||
-      _optional_render(:title_link, args.merge(title_ready: title), :hide) ||
-      title
-    add_name_context
-    title
-  end
-
-  view :title_link do |args|
-    title_text = args[:title_ready] || showname(args[:title])
-    card_link card.cardname, text: title_text
-  end
-
-  view :type_info do
-    link_args = { text: card.type_name.to_s, class: "navbar-link" }
-    link = card_link card.type_name, link_args
-    %(<span class="type-info pull-right">#{link}</span>).html_safe
-  end
-
-  view :title_editable do |args|
-    links = card.cardname.parts.map do |name|
-      card_link name
-    end
-    res = links.shift
-    links.each_with_index do |link, index|
-      name = card.cardname.parts[0..index + 1].join "+"
-      res += card_link name, text: glyphicon("plus", "header-icon")
-      res += link
-    end
-    res += " "
-    res.concat view_link(
-      glyphicon("edit", "header-icon"),
-      :edit_name,
-      class: "slotter", "data-toggle" => "tooltip", title: "edit name"
-    )
-    res.concat _optional_render(:type_link, args, :show)
-  end
-
-  view :open, tags: :comment do |args|
-    args[:optional_toggle] ||= main? ? :hide : :show
-    frame args.merge(content: true) do
-      [
-        _render_open_content(args),
-        optional_render(:comment_box, args)
-      ]
-    end
-  end
-
-  # view :anchor, perms: :none, tags: :unknown_ok do |args|
-  #   %{ <a id="#{card.cardname.url_key}" name="#{card.cardname.url_key}"></a> }
-  # end
-
-  view :type do |args|
-    klasses = ["cardtype"]
-    klass = args[:type_class]
-    klasses << klass if klass
-    card_link card.type_card.name, class: klasses
-  end
-
-  view :closed do |args|
-    frame args.reverse_merge(
-      content: true,
-      body_class: "closed-content",
-      toggle_mode: :close,
-      optional_toggle: :show,
-      optional_toolbar: :hide
-    ) do
-      _optional_render :closed_content, args
-    end
-  end
-
-  view :change do |args|
-    args[:optional_title_link] = :show
-    wrap args do
-      [
-        _optional_render(:title, args),
-        _optional_render(:menu, args, :hide),
-        _optional_render(:last_action, args)
-      ]
-    end
-  end
-
-  def current_set_card
-    set_name = params[:current_set]
-    if card.known? && card.type_id == Card::CardtypeID
-      set_name ||= "#{card.name}+*type"
-    end
-    set_name ||= "#{card.name}+*self"
-    Card.fetch(set_name)
-  end
-
-  view :related do |args|
-    if args[:related_card]
-      frame args.merge(optional_toolbar: :show) do
-        nest(args[:related_card], args[:related_args])
-      end
-    end
-  end
-
-  def default_related_args args
-    rparams = args[:related] || params[:related]
-    return unless rparams
-    rcard = rparams[:card] || begin
-      rcardname = rparams[:name].to_name.to_absolute_name(card.cardname)
-      Card.fetch rcardname, new: {}
-    end
-
-    subheader = with_name_context(card.name) do
-      subformat(rcard)._render_title(args)
-    end
-    add_name_context card.name
-    nest_args = (rparams[:slot] || {}).deep_symbolize_keys.reverse_merge(
-      view:            (rparams[:view] || :open),
-      optional_header: :hide,
-      optional_menu:   :show,
-      subheader:       subheader,
-      optional_toggle: :hide,
-      optional_help:   :show,
-      parent:          card,
-      subframe:        true,
-      subslot:         true
-    )
-    if rcard.show_comment_box_in_related?
-      nest_args[:optional_comment_box] = :show
-    end
-    args[:related_args] = nest_args
-    args[:related_card] = rcard
-  end
-
-  view :help, tags: :unknown_ok do |args|
-    text = args[:help_text] || begin
-      setting = card.new_card? ? [:add_help, { fallback: :help }] : :help
-      help_card = card.rule_card(*setting)
-      if help_card && help_card.ok?(:read)
-        with_nest_mode :normal do
-          raw_help_content = _render_raw args.merge(structure: help_card.name)
-          process_content raw_help_content, content_opts:
-            { chunk_list: :references }
-          # render help card with current card's format
-          # so current card's context is used in help card nests
-        end
-      end
-    end
-    klass = [args[:help_class], "help-text"].compact * " "
-    %(<div class="#{klass}">#{raw text}</div>) if text
-  end
-
-  view :last_action do
-    act = card.last_act
-    return unless act
-    action = act.action_on card.id
-    return unless action
-    action_verb =
-      case action.action_type
-      when :create then "added"
-      when :delete then "deleted"
-      else
-        link_to(
-          "edited",
-          path(view: :history),
-          class: "last-edited", rel: "nofollow"
-        )
-      end
-
-    %(
-      <span class="last-update">
-        #{action_verb} #{_render_acted_at} ago by
-        #{subformat(card.last_actor)._render_link}
-      </span>
-    )
-  end
-
-  private
-
-  def fancy_title title=nil, title_class=nil
-    klasses = ["card-title", title_class].compact * " "
-    title = showname(title).to_name.parts.join %(<span class="joint">+</span>)
-    raw %(<span class="#{klasses}">#{title}</span>)
-  end
-end
-
-
-# ~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/standard/set/all/rich_html/content.rb ~~
-end;end;end;end;end;