card 1.101.6 → 1.103.1

data/tmpsets/set/mod026-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/mod026-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/mod026-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/mod026-card-mod-follow/self/follow_defaults.rb

@@ -1,98 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Self
-# Set: The card "FollowDefaults"
-#
-# DEPRECATED
-#
-# The card "*follow defaults"
-#
-# Despite its name, this 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.
-#
-module FollowDefaults;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-follow/set/self/follow_defaults.rb"; end
-# PLAN:
-# - 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: { 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/mod026-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/mod026-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 ~~

data/tmpsets/set/mod026-card-mod-follow/type/cardtype.rb

@@ -1,30 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Type
-# Set: All "Cardtype" cards
-#
-module Cardtype;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-follow/set/type/cardtype.rb"; end
-def follow_label
-  follow_set_card.follow_label
-end
-
-def followed_by? user_id=nil
-  follow_set_card.all_members_followed_by? user_id
-end
-
-def follow_set_card
-  Card.fetch name, :type
-end
-
-def list_direct_followers?
-  true
-end
-
-module HtmlFormat; module_parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  def related_by_type_items
-    super.unshift ["#{card.name} cards", [card, :type, :by_name], { mark: :absolute }]
-  end
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-follow/set/type/cardtype.rb ~~

data/tmpsets/set/mod026-card-mod-follow/type/notification_template.rb

@@ -1,42 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Type
-# Set: All "NotificationTemplate" cards
-#
-module NotificationTemplate;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-follow/set/type/notification_template.rb"; end
-card_reader :contextual_class
-card_reader :disappear
-card_reader :message
-
-def deliver context
-  success.flash alert_message(context)
-end
-
-def alert_message context
-  mcard = message.present? ? message_card : self
-  format(:html).alert_message context, mcard
-end
-
-module HtmlFormat; module_parent.send :register_set_format, Card::Format::HtmlFormat, self; extend Card::Set::AbstractFormat
-  def alert_message context, message_card
-    mformat = subformat message_card
-    alert card.alert_class, true, card.disappear? do
-      mformat.contextual_content context, view: alert_view(mformat)
-    end
-  end
-
-  def alert_view format
-    format.respond_to?(:notify) ? format.notify : :core
-  end
-end
-
-def disappear?
-  disappear.present? ? disappear_card.checked? : true
-end
-
-def alert_class
-  contextual_class.present? ? contextual_class_card.item_name : :success
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-follow/set/type/notification_template.rb ~~

data/tmpsets/set/mod026-card-mod-follow/type/set.rb

@@ -1,62 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; class Type
-# Set: All "Set" cards
-#
-module Set;
-extend Card::Set
-def self.source_location; "/Users/ethan/dev/decko/gem/card-mod-follow/set/type/set.rb"; end
-event :cache_expired_for_new_set, :store, on: :create do
-  Card.follow_caches_expired
-end
-
-def list_direct_followers?
-  true
-end
-
-def follow_label
-  if (klass = subclass_for_set)
-    klass.short_label name.left_name
-  else
-    ""
-  end
-end
-
-def follow_rule_name user=nil
-  Card::Name[[name, user, :follow].compact]
-end
-
-def followed_by? user_id=nil
-  all_members_followed_by? user_id
-end
-
-def follow_set_card
-  self
-end
-
-def all_members_followed?
-  all_members_followed_by? Auth.current_id
-end
-
-def all_members_followed_by? user_id=nil
-  return false unless prototype.followed_by?(user_id)
-
-  directly_followed_by?(user_id) || broader_set_followed_by?(user_id)
-end
-
-def broader_set_followed_by? user_id
-  broader_sets.find do |set_name|
-    Card.fetch(set_name)&.directly_followed_by? user_id
-  end
-end
-
-def directly_followed?
-  directly_followed_by? Auth.current_id
-end
-
-def directly_followed_by? user_id=nil
-  return true if user_id && follow_rule?(user_id)
-
-  follow_rule?
-end
-end;end;end;end;
-# ~~ generated from /Users/ethan/dev/decko/gem/card-mod-follow/set/type/set.rb ~~

data/tmpsets/set/mod026-card-mod-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/ethan/dev/decko/gem/card-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/ethan/dev/decko/gem/card-mod-follow/set/type/user.rb ~~

data/tmpsets/set/mod026-card-mod-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/ethan/dev/decko/gem/card-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/ethan/dev/decko/gem/card-mod-follow/set/type_plus_right/user/follow.rb ~~