recfuture popup prevention

This was a really tough one.  Thanks to Nick Georgieff for guiding me and
helping me debug this.

Author: Todd Bruner

lib/Scot/App/Responder/RecFutureProxy.pm

@@ -315,23 +315,13 @@ sub store_entry {
 
     if ( $entryid ) {
         # entry exists, post a reply
-        my $entry       = $entry_col->find_iid($entryid);
-
-        if ( defined $entry ) {
-            $parent = $entry->id;         
-        }
+        my $entry   = $entry_col->find_iid($entryid);
+        $entry->update({
+            '$set'  => {
+                body    => $html,
+            }
+        });
     }
-    # need to create an entry 
-
-    my $entry   = $entry_col->create({
-        body    => $html,
-        target  => {
-            id  => $href->{id},
-            type    => 'entity',
-        },
-        parent  => $parent,
-        class   => 'entry', 
-    });
 
 }
 

lib/Scot/Controller/Api.pm

@@ -2311,16 +2311,16 @@ sub recfuture {
         });
         my $entity  = $mongo->collection('Entity')->find_iid($id);
 
-        $self->env->mq->send("/topic/scot",{
-            action  => "created",
+        $self->env->mq->send("/topic/scot", {
+            action  => "updated",
             data    => {
-                who => $req_href->{user},
-                type=> "entry",
-                id  => $entry->id,
-                target  => $entry->target,
-            },
+                who     => $self->session('user'),
+                type    => 'entity',
+                id      => $id,
+            }
         });
 
+
         $self->env->mq->send("/queue/recfuture",{
             action  => "lookup",
             data    => {

lib/Scot/Util/Enrichments.pm

@@ -96,6 +96,8 @@ sub BUILD {
                     isa         => 'HashRef',
                 )
             );
+            $log->debug("creating attribute $name with value ",
+                        { filter => \&Dumper, value => $href} );
             $self->$name($href);
         }
         else {
@@ -137,13 +139,12 @@ sub enrich {
 
         $log->debug("Looking for enrichment: $enricher_name.");
 
-        my $enricher;
-        try { 
-            $enricher    = $self->$enricher_name;
+        my $enricher = try { 
+            $self->$enricher_name;
         }
         catch {
             $log->error("$enricher_name does not have a defined attribute by same name in enrichments");
-            next NAME;
+            return undef;
         };
 
         unless ( $enricher ) {
@@ -155,7 +156,7 @@ sub enrich {
             next NAME;
         }
 
-        # $log->debug("Enricher Hash is ",{filter=>\&Dumper, value=>$enricher});
+        $log->debug("Enricher Hash is ",{filter=>\&Dumper, value=>$enricher});
 
         if ( ref($enricher) eq "HASH" ) {
 
@@ -173,6 +174,10 @@ sub enrich {
                                 title   => $enricher->{title},
                             },
                         };
+                        if ( defined $enricher->{nopopup} ) {
+                            $data->{$enricher_name}->{data}->{nopopup} = $enricher->{nopopup};
+                            $log->debug("enricher now ",{filter=>\&Dumper, value=>$data});
+                        }
                         $update_count++;
                     }
                 }
@@ -182,8 +187,13 @@ sub enrich {
                         data    => {
                             url => sprintf($enricher->{url}, $value),
                             title   => $enricher->{title},
+                            
                         },
                     };
+                    if ( defined $enricher->{nopopup} ) {
+                        $data->{$enricher_name}->{data}->{nopopup} = $enricher->{nopopup};
+                        $log->debug("enricher now ",{filter=>\&Dumper, value=>$data});
+                    }
                     $update_count++;
                 }
             }

public/asset-manifest.json

@@ -193,12 +193,12 @@ export default class SelectedEntry extends React.Component {
     }
   };
 
-  linkWarningToggle = (href) => {
+  linkWarningToggle = (href,nopop=false) => {
     if (this.state.isMounted) {
       if (this.state.linkWarningToolbar === false) {
-        this.setState({ linkWarningToolbar: true, link: href });
+        this.setState({ linkWarningToolbar: true, link: href, nopop: nopop });
       } else {
-        this.setState({ linkWarningToolbar: false });
+        this.setState({ linkWarningToolbar: false, nopop: nopop });
       }
     }
   };
@@ -464,6 +464,7 @@ export default class SelectedEntry extends React.Component {
           <LinkWarning
             linkWarningToggle={this.linkWarningToggle}
             link={this.state.link}
+            nopop={this.state.nopop}
           />
         ) : null}
       </div>