anchor.diff:  
   
   subscribe_link(Name, Fun, State) ->
  -    proc_lib:spawn_link(
  +    Parent = self(),
  +    proc_lib:spawn(
         fun () ->
  +              erlang:monitor(process, Parent),
                 Ref = make_ref(),
                 ok = gen_event:add_sup_handler(Name, {?MODULE, Ref},
                                                #state{func=Fun, func_state=State}),
  
positive.code:                               exit(normal);
                            false ->
                                exit({handler_crashed, Name, Reason})
                        end
                end
        end).
  
  
negative.code: %% limitations under the License.
  
  -module(ns_pubsub).
  
  -include("ns_common.hrl").
  
  -behaviour(gen_event).
  
  