card 1.101.2 → 1.102.0

data/tmpsets/set/mod025-card-mod-follow/right/follow.rb

@@ -1,127 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Right
-# Set: All "+Follow" cards
-#
-# The Right::Follow set configures follow preferences (`[Set]+[User]+:follow`)
-# While the user follow dashboard ([User]+:follow`) is also in this Set, its
-module Follow;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-follow/set/right/follow.rb"; end
-# customizations are handled in TypePlusRight::User::Follow
-
-event :cache_expired_for_new_preference, :integrate, when: :is_preference? do
-  Card.follow_caches_expired
-end
-
-def option_cards
-  Card::FollowOption.cards.compact
-end
-
-def options_rule_card
-  Card.new(
-    name: "follow_options_card",
-    type_code: :pointer,
-    content: option_cards.map { |oc| "[[#{oc.name}]]" }.join("\n")
-  )
-end
-
-def add_follow_item? condition
-  new_card? || !include_item?(condition)
-end
-
-def ok_to_update
-  permit :update
-end
-
-def ok_to_create
-  permit :create
-end
-
-def ok_to_delete
-  permit :delete
-end
-
-def permit action, verb=nil
-  if %i[create delete update].include?(action) && allowed_to_change_follow_status?
-    true
-  else
-    super action, verb
-  end
-end
-
-def allowed_to_change_follow_status?
-  Auth.signed_in? &&
-    ((user = rule_user) && Auth.current_id == user.id) || Auth.always_ok?
-end
-
-module HtmlFormat; module_parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  # shows a follow item link for each of the current follow options
-  view :follow_status, cache: :never do
-    wrap { haml :follow_status }
-  end
-
-  # interface to view/alter a specific rule option
-  view :follow_item, cache: :never do
-    follow_item Env.params[:condition]
-  end
-
-  def follow_item condition, button=true
-    condition ||= "*always"
-    wrap do
-      card_form action: :update, success: { view: :follow_item } do
-        [
-          follow_item_hidden_tags(condition),
-          (follow_item_button(condition) if button),
-          follow_item_link(condition)
-        ].compact
-      end
-    end
-  end
-
-  def rule_form_args
-    super.merge "data-update-foreign-slot": ".card-slot.follow_section-view"
-  end
-
-  private
-
-  def follow_item_hidden_tags condition
-    condkey = card.add_follow_item?(condition) ? :add_item : :drop_item
-    hidden_tags condition: condition, condkey => condition
-  end
-
-  def follow_item_button condition
-    action = card.add_follow_item?(condition) ? :add : :delete
-    button_tag type: :submit, "aria-label": "Left Align",
-               class: "btn-sm btn-item #{follow_item_button_class action}" do
-      follow_item_icon action
-    end
-  end
-
-  def follow_item_button_class action
-    action == :add ? "btn-item-add" : "btn-item-delete btn-primary"
-  end
-
-  def follow_item_icon action
-    icon_tag(action == :add ? :add : :check)
-  end
-
-  def follow_item_link condition
-    link_to_card follow_item_link_target, follow_item_link_text(condition)
-  end
-
-  def follow_item_link_target
-    set = card.rule_set
-    setname = set.name
-    set.tag.codename == :self ? setname.left : setname.field("by name")
-  end
-
-  def follow_item_link_text condition
-    if (option_card = Card.fetch condition)
-      option_card.description card.rule_set
-    else
-      card.rule_set.follow_label
-    end
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-follow/set/right/follow.rb ~~

data/tmpsets/set/mod025-card-mod-follow/right/follow_fields.rb

@@ -1,12 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Right
-# Set: All "+FollowFields" cards
-#
-module FollowFields;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-follow/set/right/follow_fields.rb"; end
-event :follow_fields_changed, :integrate do
-  Card.follow_caches_expired
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-follow/set/right/follow_fields.rb ~~

data/tmpsets/set/mod025-card-mod-follow/right/followers.rb

@@ -1,32 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Right
-# Set: All "+Followers" cards
-#
-# -*- encoding : utf-8 -*-
-
-module Followers;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-follow/set/right/followers.rb"; end
-# X+*followers provides a list of all users following X.
-
-include_set Abstract::Pointer
-
-module HtmlFormat; module_parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  view :core, cache: :never do
-    super()
-  end
-end
-
-def content
-  left ? item_names.to_pointer_content : ""
-end
-
-def item_names _args={}
-  left ? left.follow_set_card.prototype.follower_names : []
-end
-
-def virtual?
-  new?
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-follow/set/right/followers.rb ~~

data/tmpsets/set/mod025-card-mod-follow/right/following.rb

@@ -1,59 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Right
-# Set: All "+Following" cards
-#
-module Following;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-follow/set/right/following.rb"; end
-def virtual?
-  new?
-end
-
-module HtmlFormat; module_parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  view :core do
-    if card.left && Auth.signed_in?
-      render_rule_editor
-    else
-      nest Card.fetch(card.name.left, :followers), view: :titled, items: { view: :link }
-    end
-  end
-
-  view :status do
-    if (rcard = current_follow_rule_card)
-      rcard.item_cards.map do |item|
-        %(<div class="alert alert-success" role="alert">
-          <strong>#{rcard.rule_set.follow_label}</strong>: #{item.title}
-         </div>)
-      end.join
-    else
-      "No following preference"
-    end
-  end
-
-  view :one_line_content do
-    ""
-  end
-
-  view :rule_editor, cache: :never do
-    rule_context = Card.fetch preference_name, new: { type_id: PointerID }
-    wrap_with :div, class: "edit-rule" do
-      follow_context = current_follow_rule_card || rule_context
-      subformat(follow_context).rule_form :open, rule_context, :modal
-    end
-  end
-
-  def preference_name
-    set_name = card.left.follow_set_card.name
-    Card::Name[set_name, Auth.current.name, :follow]
-  end
-
-  def edit_rule_success
-    { view: "status", id: card.name.url_key }
-  end
-
-  def current_follow_rule_card
-    card.left.preference :follow
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-follow/set/right/following.rb ~~

data/tmpsets/set/mod025-card-mod-follow/self/always.rb

@@ -1,22 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Self
-# Set: The card "Always"
-#
-module Always;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-follow/set/self/always.rb"; end
-include_set Abstract::FollowOption
-
-follow_opts position: 2
-
-follow_test { |_follower_id, _accounted_ids| true }
-
-def title
-  "Following"
-end
-
-def label
-  "follow"
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-follow/set/self/always.rb ~~

data/tmpsets/set/mod025-card-mod-follow/self/created.rb

@@ -1,28 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Self
-# Set: The card "Created"
-#
-module Created;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-follow/set/self/created.rb"; end
-include_set Abstract::FollowOption
-
-restrictive_follow_opts position: 1
-
-follower_candidate_ids do |card|
-  [card.creator_id]
-end
-
-def title
-  "Following content you created"
-end
-
-def label
-  "follow if I created"
-end
-
-def description set_card
-  "#{set_card.follow_label} I created"
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-follow/set/self/created.rb ~~

data/tmpsets/set/mod025-card-mod-follow/self/edited.rb

@@ -1,29 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Self
-# Set: The card "Edited"
-#
-module Edited;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-follow/set/self/edited.rb"; end
-include_set Abstract::FollowOption
-
-restrictive_follow_opts position: 2
-
-follower_candidate_ids do |card|
-  # FIXME? - could optimize by not using cards table...
-  card.id ? Card.search(editor_of: card.id, return: :id) : []
-end
-
-def title
-  "Following content you edited"
-end
-
-def label
-  "follow if I edited"
-end
-
-def description set_card
-  "#{set_card.follow_label} I edited"
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-follow/set/self/edited.rb ~~

data/tmpsets/set/mod025-card-mod-follow/self/follow.rb

@@ -1,10 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Self
-# Set: The card "Follow"
-#
-module Follow;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-follow/set/self/follow.rb"; end
-setting_opts group: :other, position: 7, rule_type_editable: false, preference: true
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-follow/set/self/follow.rb ~~

data/tmpsets/set/mod025-card-mod-follow/self/follow_defaults.rb

@@ -1,97 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Self
-# Set: The card "FollowDefaults"
-#
-# DEPRECATED
-#
-# Despite its name (*follow defaults)card does not influence defaults for *follow rules.
-# What it does is provide a mechanism (with interface) for updating all users so that
-# they follow the items that are its content.
-#
-# PLAN:
-module FollowDefaults;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-follow/set/self/follow_defaults.rb"; end
-# - actual defaults should be handled as much as possible with something like
-#   the *defaults rule
-# - on the *admin page, we can have a link so sharks can update all the pristine cards
-#   to use whatever the actual defaults representation is (see previous point)
-# - if you truly want to override existing follow rules, that may be monkey territory?
-# - we will delete "*follow defaults" after the above are completed
-
-event :update_follow_rules, :finalize, on: :save, when: :update_all_users do
-  Auth.as_bot do
-    Card.search(type: "user").each do |user|
-      follow_defaults.each do |set_card, option|
-        follow_rule = Card.fetch(set_card.follow_rule_name(user.name), new: {})
-        next unless follow_rule
-
-        follow_rule.drop_item "*never"
-        follow_rule.drop_item "*always"
-        follow_rule.add_item option
-        follow_rule.save!
-      end
-    end
-  end
-  Card.follow_caches_expired
-end
-
-def follow_defaults
-  item_names.map do |item|
-    if (set_card = Card.fetch item.to_name.left)&.type_code == :set
-      [set_card, follow_option(item)]
-    end
-  end.compact
-end
-
-def follow_option item
-  option_card =
-    Card.fetch(item.to_name.right) || Card[item.to_name.right.to_sym]
-  option_card.follow_option? ? option_card.name : "*always"
-end
-
-module HtmlFormat; module_parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  view :edit, perms: :update, unknown: true do
-    frame_and_form :update, hidden: { success: "_self",
-                                      card: { update_all_users: false } } do
-      [
-        _render_content_formgroups,
-        _render_confirm_update_all,
-        _render_edit_buttons
-      ]
-    end
-  end
-
-  view :edit_buttons do
-    button_formgroup do
-      [submit_and_update_button, simple_submit_button, cancel_to_edit_button]
-    end
-  end
-
-  def submit_and_update_button
-    submit_button text: "Submit and update all users",
-                  disable_with: "Updating", class: "follow-updater"
-  end
-
-  def simple_submit_button
-    button_tag "Submit", class: "follow"
-  end
-
-  def cancel_to_edit_button
-    cancel_button href: path(view: :edit, id: card.id)
-  end
-
-  view :confirm_update_all do
-    wrap do
-      alert "info" do
-        %(
-          <h1>Are you sure you want to change the default follow rules?</h1>
-          <p>You may choose to update all existing users.
-             This may take a while. </p>
-        )
-      end
-    end
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-follow/set/self/follow_defaults.rb ~~

data/tmpsets/set/mod025-card-mod-follow/self/follow_fields.rb

@@ -1,10 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Self
-# Set: The card "FollowFields"
-#
-module FollowFields;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-follow/set/self/follow_fields.rb"; end
-setting_opts group: :other, position: 5, rule_type_editable: false
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-follow/set/self/follow_fields.rb ~~

data/tmpsets/set/mod025-card-mod-follow/self/never.rb

@@ -1,22 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Self
-# Set: The card "Never"
-#
-module Never;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-follow/set/self/never.rb"; end
-include_set Abstract::FollowOption
-
-follow_opts position: 3
-
-follow_test { |_follower_id, _accounted_ids| false }
-
-def title
-  "Ignoring"
-end
-
-def label
-  "ignore"
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-follow/set/self/never.rb ~~