card 1.18.6 → 1.19.0

data/tmpsets/set/mod006-05_email/all/observer.rb

@@ -1,34 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; module All; module Observer; extend Card::Set
-# ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/all/observer.rb ~~~~~~~~~~~
-def send_action_mails args
-  setting = "on_#{args[:on]}".to_sym
-  email_templates_for( setting ) do |mailcard|
-    mailcard.deliver( context: self )
-  end
-end
-
-def email_templates_for setting
-
-  if (email_templates = @email_template_cache ||
-      ((event_card = self.rule_card(setting)) && event_card.extended_item_cards))
-    email_templates.each do |mailcard|
-      yield(mailcard)
-    end
-  end
-end
-
-[:create, :update, :delete].each do |action|
-  event "observer_#{action}".to_sym, after: :extend, on: action do
-    self.send_action_mails on: action
-  end
-end
-
-event :cache_delete_email_templates, after: :approve, on: :delete do
-  event_card = self.rule_card(:on_delete)
-  @email_template_cache = event_card && event_card.extended_item_cards
-end
-
-
-# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/all/observer.rb ~~~~~~~~~~~
-end;end;end;end;

data/tmpsets/set/mod006-05_email/right/bcc.rb

@@ -1,52 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; module Right; module Bcc; extend Card::Set
-# ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/right/bcc.rb ~~~~~~~~~~~
-
-def process_email_addresses context_card, format_args, args
-  format(format_args).render_email_addresses(args.merge(context: context_card))
-end
-
-
-format do
-  def chunk_list  #turn off autodetection of uri's
-    :references
-  end
-end
-
-
-format :html do
-  view :pointer_items do |args|
-    card.item_names(context: :raw).map do |iname|
-      wrap_item iname, args
-    end.join ', '
-  end
-end
-
-format :email_text do
-  view :email_addresses do |args|
-    context = args[:context] || self
-    card.item_names(context: context.cardname).map do |item_name|
-      # note that context is processed twice here because pointers absolutize item_names by default
-      # while other types can return relative names.  That's poor default behavior and should be fixed!
-      item_name = item_name.to_name.to_absolute(context).to_s
-      if item_name.match(/.+\@.+\..+/)
-        item_name
-      elsif item_card = Card.fetch( item_name )
-        if item_card.account
-          item_card.account.email
-        else
-          item_card.contextual_content(context,format: :email_text).split( /[,\n]/ )
-        end
-      end
-    end.flatten.compact.join(', ')
-  end
-end
-
-
-
-# _user, info@mail.com, Ethan, Pointer -> ..., _left+email, my email address -> info@mail.com
-
-
-
-# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/right/bcc.rb ~~~~~~~~~~~
-end;end;end;end;

data/tmpsets/set/mod006-05_email/right/cc.rb

@@ -1,10 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; module Right; module Cc; extend Card::Set
-# ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/right/cc.rb ~~~~~~~~~~~
-include Bcc
-format(:email_text) { include Bcc::EmailTextFormat }
-format(:html)       { include Bcc::HtmlFormat }
-
-
-# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/right/cc.rb ~~~~~~~~~~~
-end;end;end;end;

data/tmpsets/set/mod006-05_email/right/follow.rb

@@ -1,118 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; module Right; module Follow; extend Card::Set
-# ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/right/follow.rb ~~~~~~~~~~~
-include All::Permissions::Follow
-
-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.title}]]" }.join("\n")
-  )
-end
-
-
-format :html do
-  def default_follow_item_args args
-    args[:condition] ||= Env.params[:condition] || '*always'
-  end
-
-  view :follow_item, tags: :unknown_ok do |args|
-    if card.new_card? || !card.include_item?(args[:condition])
-      button_view = :add_follow_rule_button
-      form_opts = {add_item: args[:condition]}
-    else
-      button_view = :delete_follow_rule_button
-      form_opts = {drop_item: args[:condition]}
-    end
-
-    text = if (option_card = Card.fetch args[:condition])
-             option_card.description(card.rule_set)
-           else
-             card.rule_set.follow_label
-           end
-    link_target = if card.rule_set.tag.codename == 'self'
-                    card.rule_set_name.left
-                  else
-                    "#{card.rule_set_name}+by name"
-                  end
-    wrap do
-      card_form(
-        { action: :update, name: card.name, success: { view: :follow_item } },
-        hidden: { condition: args[:condition] }.merge(form_opts)
-      ) do
-
-        output [
-          _optional_render(button_view, args),
-          card_link( link_target, text: text)
-        ]
-      end
-    end
-  end
-
-  def default_follow_status_args args
-    args[:card_key] ||= card.set_prototype.key
-  end
-
-  view :follow_status do |args|
-    %{
-      <h4>Get notified about changes</h4>
-
-      #{
-        wrap_with( :ul, class: 'delete-list list-group') do
-          card.item_names.map do |option|
-            content_tag :li, class: 'list-group-item' do
-              condition = option == '*never' ? '*always' : option
-              subformat(card).render_follow_item condition: condition
-            end
-          end.join "\n"
-        end
-      }
-
-      #{
-        card_link(args[:card_key], {
-          text: 'more options',
-          path_opts: {
-            view: :related,
-            related: {
-              name: card.name,
-              view: :related_edit_rule
-            }
-          },
-          class: 'btn update-follow-link',
-          'data-card_key'=>args[:card_key]
-        })
-      }
-    }
-  end
-
-
-  view :delete_follow_rule_button do |args|
-    button_tag(
-      type: :submit,
-      class: 'btn-xs btn-item-delete btn-primary', 'aria-label'=>'Left Align'
-    ) do
-
-      tag :span, class: "glyphicon glyphicon-ok", 'aria-hidden'=>"true"
-    end
-
-  end
-
-  view :add_follow_rule_button do |args|
-    button_tag(
-      type: :submit,
-      class: 'btn-xs btn-item-add', 'aria-label'=>'Left Align'
-    ) do
-
-      tag :span, class: "glyphicon glyphicon-plus", 'aria-hidden'=>"true"
-    end
-  end
-
-end
-
-# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/right/follow.rb ~~~~~~~~~~~
-end;end;end;end;

data/tmpsets/set/mod006-05_email/right/follow_fields.rb

@@ -1,9 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; module Right; module FollowFields; extend Card::Set
-# ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/right/follow_fields.rb ~~~~~~~~~~~
-event :follow_fields_changed, before: :extend do
-  Card.follow_caches_expired
-end
-
-# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/right/follow_fields.rb ~~~~~~~~~~~
-end;end;end;end;

data/tmpsets/set/mod006-05_email/right/followers.rb

@@ -1,39 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; module Right; module Followers; extend Card::Set
-# ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/right/followers.rb ~~~~~~~~~~~
-# -*- encoding : utf-8 -*-
-
-include Card::Set::Type::Pointer
-
-def raw_content
-  if left
-    items =
-      if (left.type_id == SetID) || (left.type_id == CardtypeID)
-        set_card = left.default_follow_set_card
-        set_card.all_user_ids_with_rule_for(:follow).map do |user_id|
-          if left.followed_by?(user_id) && (user = Card.find(user_id))
-            user.name
-          end
-        end.compact
-      else
-        left.follower_names
-      end
-    items.map { |item| "[[#{item}]]" }.join "\n"
-  else
-    ''
-  end
-end
-
-def virtual?; !real? end
-
-format do
-  include Card::Set::Type::Pointer::Format
-end
-
-format :html do
-  include Card::Set::Type::Pointer::HtmlFormat
-end
-
-
-# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/right/followers.rb ~~~~~~~~~~~
-end;end;end;end;

data/tmpsets/set/mod006-05_email/right/following.rb

@@ -1,68 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; module Right; module Following; extend Card::Set
-# ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/right/following.rb ~~~~~~~~~~~
-
-def virtual?; !real? end
-
-
-format :html do
-
-  view :core do |args|
-    if card.left && Auth.signed_in?
-      render_rule_editor args
-    else
-      fname = "#{card.cardname.left}+#{Card[:followers].name}"
-      fcard = Card.fetch fname
-      nest fcard, view: :titled, item: :link
-    end
-  end
-
-  view :status do |args|
-    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 :closed_content do |args|
-    ''
-  end
-
-=begin
-   view :editor do |args|
-     hidden_field( :content, class: 'card-content', 'no-autosave'=>true) +
-        (args.delete(:select_list) ? raw(render_rule_editor(args)) : super(args) )
-   end
-=end
-
-  view :rule_editor do |args|
-    preference_name = [
-      card.left.default_follow_set_card.name,
-      Auth.current.name,
-      Card[:follow].name
-    ]*'+'
-    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).render_edit_rule(
-        rule_context: rule_context,
-        success: { view: 'status', id: card.name }
-      )
-    end
-  end
-
-  def current_follow_rule_card
-    card.left.rule_card :follow, user: Auth.current
-  end
-
-end
-
-
-# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/right/following.rb ~~~~~~~~~~~
-end;end;end;end;

data/tmpsets/set/mod006-05_email/right/from.rb

@@ -1,10 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; module Right; module From; extend Card::Set
-# ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/right/from.rb ~~~~~~~~~~~
-include Bcc
-format(:email_text) { include Bcc::EmailTextFormat }
-format(:html)       { include Bcc::HtmlFormat }
-
-
-# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/right/from.rb ~~~~~~~~~~~
-end;end;end;end;

data/tmpsets/set/mod006-05_email/right/html_message.rb

@@ -1,10 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; module Right; module HtmlMessage; extend Card::Set
-# ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/right/html_message.rb ~~~~~~~~~~~
-def clean_html?
-  false
-end
-
-
-# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/right/html_message.rb ~~~~~~~~~~~
-end;end;end;end;

data/tmpsets/set/mod006-05_email/right/to.rb

@@ -1,10 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; module Right; module To; extend Card::Set
-# ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/right/to.rb ~~~~~~~~~~~
-include Bcc
-format(:email_text) { include Bcc::EmailTextFormat }
-format(:html)       { include Bcc::HtmlFormat }
-
-
-# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/right/to.rb ~~~~~~~~~~~
-end;end;end;end;

data/tmpsets/set/mod006-05_email/self/always.rb

@@ -1,21 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; module Self; module Always; extend Card::Set
-# ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/self/always.rb ~~~~~~~~~~~
-include Card::FollowOption
-
-follow_opts position: 2
-
-follow_test { |follower_id, accounted_ids| true }
-
-def title
-  'Following'
-end
-
-def label
-  'follow'
-end
-
-
-
-# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/self/always.rb ~~~~~~~~~~~
-end;end;end;end;

data/tmpsets/set/mod006-05_email/self/created.rb

@@ -1,28 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; module Self; module Created; extend Card::Set
-# ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/self/created.rb ~~~~~~~~~~~
-include Card::FollowOption
-
-self.restrictive_follow_opts position: 1
-
-self.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
-
-
-
-# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/self/created.rb ~~~~~~~~~~~
-end;end;end;end;

data/tmpsets/set/mod006-05_email/self/edited.rb

@@ -1,31 +0,0 @@
-# -*- encoding : utf-8 -*-
-class Card; module Set; module Self; module Edited; extend Card::Set
-# ~~~~~~~~~~~ above autogenerated; below pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/self/edited.rb ~~~~~~~~~~~
-include Card::FollowOption
-
-self.restrictive_follow_opts position: 2
-
-self.follower_candidate_ids do |card|
-  # FIXME? - could optimize by not using cards table...
-  Card.search editor_of: card.name, 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
-
-
-
-
-
-# ~~~~~~~~~~~ below autogenerated; above pulled from /Users/ethan/dev/wagn/gem/card/mod/05_email/set/self/edited.rb ~~~~~~~~~~~
-end;end;end;end;