card 1.102.0 → 1.103.0

data/tmpsets/set/mod026-follow/type/user.rb

@@ -1,16 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Type
-# Set: All "User" cards
-#
-module User;
-extend Card::Set
-def self.source_location; "/Users/ezl5238/dev/decko/gem/mod/follow/set/type/user.rb"; end
-def follow follow_name, option="*always"
-  return unless (follow_rule = Card.fetch(follow_name)&.follow_rule_card(name, new: {}))
-
-  follow_rule.drop_item "*never"
-  follow_rule.add_item option
-  follow_rule.save!
-end
-end;end;end;end;
-# ~~ generated from /Users/ezl5238/dev/decko/gem/mod/follow/set/type/user.rb ~~

data/tmpsets/set/mod026-follow/type_plus_right/user/follow.rb

@@ -1,87 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class TypePlusRight; module User;
-# Set: All "+Follow" cards on "User" cards
-#
-module Follow;
-extend Card::Set
-def self.source_location; "/Users/ezl5238/dev/decko/gem/mod/follow/set/type_plus_right/user/follow.rb"; end
-FOLLOW_TABS = { "Follow" => { view: "follow_tab" },
-                "Ignore" => { view: "ignore_tab" } }.freeze
-
-# a virtual pointer to the sets that a user is following.
-# (data is stored in preferences: `[Set]+[User]+:follow`)
-
-include_set Abstract::Pointer
-def virtual?
-  new?
-end
-
-# overrides pointer default
-def item_names _args={}
-  if (user = left)
-    Card::Rule.preference_names user.name, "follow"
-  else
-    []
-  end
-end
-
-def suggestions
-  Card[:follow_suggestions]&.item_names || []
-end
-
-def current_user?
-  Auth.signed_in? && Auth.current_id == left.id
-end
-
-module HtmlFormat; module_parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  view :one_line_content do
-    ""
-  end
-
-  view :edit do
-    render :open
-  end
-
-  # renders follow tab and ignore tab
-  view :core do
-    tabs FOLLOW_TABS, "Follow", load: :lazy do
-      render_follow_tab
-    end
-  end
-
-  view :follow_tab, cache: :never do
-    haml :follow_editor, items_method: :following_rules_and_options
-  end
-
-  view :ignore_tab, cache: :never do
-    haml :follow_editor, items_method: :ignoring_rules_and_options
-  end
-
-  def show_button?
-    card.current_user? || Auth.always_ok?
-  end
-
-  def pointer_items args
-    voo.items[:view] ||= :link
-    super(args)
-  end
-
-  # TODO: research and generalize
-  # this does not look specific to following!
-  view :errors, perms: :none do
-    return unless card.errors.any?
-
-    if card.errors.find { |attrib, _msg| attrib == :permission_denied }
-      Env.save_interrupted_action(request.env["REQUEST_URI"])
-      voo.title = "Problems with #{card.name}"
-      class_up "d0-card-frame", "card card-warning card-inverse"
-      frame do
-        "Please #{link_to_card :signin, 'sign in'}" # " #{to_task}"
-      end
-    else
-      super()
-    end
-  end
-end
-end;end;end;end;end;
-# ~~ generated from /Users/ezl5238/dev/decko/gem/mod/follow/set/type_plus_right/user/follow.rb ~~

data/tmpsets/set/mod026-follow/type_plus_right/user/follow/follow_editor_helper.rb

@@ -1,130 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class TypePlusRight; module User;; module Follow;
-# Set: All "+FollowEditorHelper" cards on "User+Follow" cards (FollowEditorHelper)
-#
-# all the following methods are used to construct the Follow and Ignore tabs
-
-module FollowEditorHelper;
-extend Card::Set
-def self.source_location; "/Users/ezl5238/dev/decko/gem/mod/follow/set/type_plus_right/user/follow/follow_editor_helper.rb"; end
-# TODO: these object representations are complex enough for their own class
-
-module HtmlFormat; module_parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  # constructs hash of rules/options for "Follow" tab
-  def following_rules_and_options &block
-    rule_opt_array = following_rule_options_hash.map do |key, val|
-      [(Card.fetch key, new: {}), val]
-    end
-    rules_and_options_by_set_pattern Hash[rule_opt_array], &block
-  end
-
-  # constructs hash of rules/options for "Ignore" tab
-  def ignoring_rules_and_options &block
-    rule_opts_hash = ignore_rules.each_with_object({}) do |rule, hash|
-      hash[rule] = [:never.cardname]
-    end
-    rules_and_options_by_set_pattern rule_opts_hash, &block
-  end
-
-  private
-
-  # all rules with ignore
-  def ignore_rules
-    never = :never.cardname.key
-    card.item_cards.select do |follow_rule|
-      follow_rule.item_names.select { |n| n.key == never }.any?
-    end
-  end
-
-  # @param rule_opts_hash [Hash] { rule1_card => rule1_follow_options }
-  # for each rule/option variant, yields with rule_card and option params
-  def rules_and_options_by_set_pattern rule_opts_hash
-    pattern_hash = a_set_pattern_hash rule_opts_hash
-    empty = true
-    Card.set_patterns.reverse.map do |pattern|
-      pattern_hash[pattern].each do |rule_card, options|
-        options.each do |option|
-          yield rule_card, option
-          empty = false
-        end
-      end
-    end
-    yield nil if empty
-  end
-
-  def a_set_pattern_hash rule_opts_hash
-    pattern_hash = Hash.new { |h, k| h[k] = [] }
-    rule_opts_hash.each do |rule_card, options|
-      pattern_hash[rule_card.rule_set.subclass_for_set] << [rule_card, options]
-    end
-    pattern_hash
-  end
-
-  # @return Hash # { rule1 => rule1_follow_options }
-  def following_rule_options_hash
-    merge_option_hashes current_following_rule_options_hash,
-                        suggested_following_rule_options_hash
-  end
-
-  # adds suggested follow options to existing rules where applicable
-  def merge_option_hashes current, suggested
-    current.each do |key, current_opt|
-      if (suggested_opt = suggested.delete(key))
-        current[key] = (current_opt + suggested_opt).uniq
-      end
-    end
-    current.merge suggested
-  end
-
-  # @return Hash # { existing_rule1 => rule1_follow_options } (excluding never)
-  # (*never is excluded because this list is for the Follow tab, and *never is
-  # handled under the Ignore tab)
-  def current_following_rule_options_hash
-    never = :never.cardname
-    card.item_cards.each_with_object({}) do |follow_rule, hash|
-      hash[follow_rule.key] = follow_rule.item_names.reject { |item| item == never }
-    end
-  end
-
-  # @return Hash # { suggested_rule1 => rule1_follow_options }
-  def suggested_following_rule_options_hash
-    return {} unless card.current_user?
-
-    card.suggestions.each_with_object({}) do |sug, hash|
-      set_card, opt = a_set_and_option_suggestion(sug) || a_set_only_suggestion(sug)
-      hash[set_card.follow_rule_name(card.trunk).key] = [opt]
-    end
-  end
-
-  # @param sug [String] follow suggestion
-  # @return [Array] set_card and option
-  # suggestion value contains both set and follow option
-  def a_set_and_option_suggestion sug
-    return unless (set_card = valid_set_card(sug.to_name.left))
-
-    [set_card, suggested_follow_option(sug.to_name.right)]
-  end
-
-  def suggested_follow_option name
-    # FIXME: option should be unambiguously name or codename
-    # (if codename use colon or Symbol)
-    option_card = Card.fetch(name) || Card[name.to_sym]
-    option_card&.follow_option? ? option_card.name : :always.cardname
-  end
-
-  # @param sug [String] follow suggestion
-  # @return [Array] set_card and option
-  # suggestion value contains only set (implies *always)
-  def a_set_only_suggestion sug
-    return unless (set_card = valid_set_card(sug))
-
-    yield set_card, :always.cardname
-  end
-
-  def valid_set_card name
-    card = Card.fetch(name)
-    card&.type_code == :set ? card : false
-  end
-end
-end;end;end;end;end;end;
-# ~~ generated from /Users/ezl5238/dev/decko/gem/mod/follow/set/type_plus_right/user/follow/follow_editor_helper.rb ~~

data/tmpsets/set/mod027-google_analytics/all/google_analytics.rb

@@ -1,51 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All
-# Set: All cards (GoogleAnalytics)
-#
-module GoogleAnalytics;
-extend Card::Set
-def self.source_location; "/Users/ezl5238/dev/decko/gem/mod/google_analytics/set/all/google_analytics.rb"; end
-require "staccato"
-
-mattr_accessor :server_side_tracking_formats
-
-self.server_side_tracking_formats = %i[csv json]
-
-event :track_page, before: :show_page, when: :track_page? do
-  tracker.pageview path: Env.controller.request&.path, host: Env.host, title: name
-end
-
-def track_page?
-  google_analytics_key &&
-    Env.controller&.response_format&.in?(server_side_tracking_formats)
-end
-
-def tracker
-  return unless google_analytics_key
-
-  ::Staccato.tracker google_analytics_key # , nil, ssl: true
-end
-
-def google_analytics_key
-  @google_analytics_key ||=
-    Card::Rule.global_setting(:google_analytics_key) ||
-    Card.config.google_analytics_key
-end
-
-module HtmlFormat; module_parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  delegate :tracker, :google_analytics_key, to: :card
-
-  def views_in_head
-    super << :google_analytics_snippet
-  end
-
-  view :google_analytics_snippet, unknown: true, perms: :none do
-    haml :google_analytics_snippet if google_analytics_key
-  end
-
-  def google_analytics_snippet_vars
-    { anonymizeIp: true }
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ezl5238/dev/decko/gem/mod/google_analytics/set/all/google_analytics.rb ~~

data/tmpsets/set/mod028-help/all/guide.rb

@@ -1,60 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All
-# Set: All cards (Guide)
-#
-module Guide;
-extend Card::Set
-def self.source_location; "/Users/ezl5238/dev/decko/gem/mod/help/set/all/guide.rb"; end
-def guide_card
-  guide_card = rule_card(:guide)
-  return unless guide_card
-
-  guide_card = guide_card.first_card if guide_card.type_id == Card::PointerID
-  guide_card if guide_card.ok?(:read)
-end
-
-module HtmlFormat; module_parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  view :guide, unknown: true, cache: :never, wrap: :slot do
-    guide
-  end
-
-  def guide
-    guide_text = rule_based_guide
-    return "" unless guide_text.present?
-
-    if (rule_card = card.help_rule_card)
-      edit_link = with_nest_mode(:normal) { nest(rule_card, view: :edit_link) }
-      guide_text = "<span class='d-none'>#{edit_link}</span>#{guide_text}"
-    end
-    wrap_with :div, guide_text, class: classy("guide-text")
-  end
-
-  def alert_guide
-    guide_text = guide
-    return "" unless guide_text.present?
-
-    alert(:secondary, true, false, class: "guide") { guide_text }
-  end
-
-  def raw_guide_text
-    false
-  end
-
-  def rule_based_guide
-    if raw_guide_text
-      with_nest_mode :normal do
-        process_content raw_guide_text, chunk_list: :references
-        # render guide text with current card's format
-        # so current card's context is used in guide card nests
-      end
-    elsif card.guide_card
-      with_nest_mode :normal do
-        nest card.guide_card, view: :core
-      end
-    else
-      ""
-    end
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ezl5238/dev/decko/gem/mod/help/set/all/guide.rb ~~

data/tmpsets/set/mod028-help/all/help.rb

@@ -1,58 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class All
-# Set: All cards (Help)
-#
-module Help;
-extend Card::Set
-def self.source_location; "/Users/ezl5238/dev/decko/gem/mod/help/set/all/help.rb"; end
-def help_rule_card
-  help_card = rule_card(:help)
-  help_card if help_card&.ok?(:read)
-end
-
-module HtmlFormat; module_parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  view :help, unknown: true, cache: :never, wrap: :slot do
-    help = help_text
-    return "" unless help.present?
-
-    wrap_with :div, wrap_help_text(help), class: classy("help-text")
-  end
-
-  view :help_text, unknown: true, cache: :never do
-    wrap_help_text help_text
-  end
-
-  def wrap_help_text text
-    help = text
-    if (rule_card = card.help_rule_card)
-      edit_link = with_nest_mode(:normal) { nest(rule_card, view: :edit_link) }
-      help = "<span class='d-none'>#{edit_link}</span>#{text}"
-    end
-    help
-  end
-
-  view :lead do
-    class_up "card-slot", "lead"
-    _view_content
-  end
-
-  def help_text
-    voo.help || rule_based_help
-  end
-
-  def raw_help_text
-    card.try(:raw_help_text) || card.help_rule_card&.content
-  end
-
-  def rule_based_help
-    return "" unless (help_text = raw_help_text)
-
-    with_nest_mode :normal do
-      process_content help_text, 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
-end;end;end;end;
-# ~~ generated from /Users/ezl5238/dev/decko/gem/mod/help/set/all/help.rb ~~

data/tmpsets/set/mod028-help/right/guide.rb

@@ -1,17 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Right
-# Set: All "+Guide" cards
-#
-# include_set Abstract::TemplatedNests
-module Guide;
-extend Card::Set
-def self.source_location; "/Users/ezl5238/dev/decko/gem/mod/help/set/right/guide.rb"; end
-
-module HtmlFormat; module_parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  def raw_help_text
-    # LOCALIZE
-    "Appears in the full editor view to guide users."
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ezl5238/dev/decko/gem/mod/help/set/right/guide.rb ~~

data/tmpsets/set/mod028-help/right/help.rb

@@ -1,24 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Right
-# Set: All "+Help" cards
-#
-module Help;
-extend Card::Set
-def self.source_location; "/Users/ezl5238/dev/decko/gem/mod/help/set/right/help.rb"; end
-include_set Abstract::TemplatedNests
-
-module HtmlFormat; module_parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  view :popover do
-    popover_link _render_core
-  end
-
-  def quick_editor
-    # TODO: refactor when voo.input_type is ready.  (and use class_up)
-    formgroup "Content", input: :content, help: false do
-      text_field :content, value: card.content,
-                           class: "d0-card-content _submit-after-typing"
-    end
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ezl5238/dev/decko/gem/mod/help/set/right/help.rb ~~