~ubuntu-branches/debian/squeeze/erlang/squeeze

« back to all changes in this revision

Viewing changes to lib/cosNotification/src/CosNotifyChannelAdmin_EventChannel_impl.erl

  • Committer: Bazaar Package Importer
  • Author(s): Sergei Golovan
  • Date: 2009-08-05 20:54:29 UTC
  • mfrom: (6.1.2 sid)
  • Revision ID: james.westby@ubuntu.com-20090805205429-pm4pnwew8axraosl
Tags: 1:13.b.1-dfsg-5
* Fixed parentheses in Emacs mode (closes: #536891).
* Removed unnecessary conflicts with erlang-manpages package.
* Added workaround for #475459: disabled threads on sparc architecture.
  This breaks wxErlang, so it's only a temporary solution.

Show diffs side-by-side

added added

removed removed

Lines of Context:
419
419
    end;            
420
420
get_consumeradmin(_OE_THIS, _OE_FROM, State, 0) ->
421
421
    {reply, ?get_defConsumerAdm(State), State};
422
 
get_consumeradmin(_OE_THIS, _OE_FROM, State, AdminId) when integer(AdminId) ->
 
422
get_consumeradmin(_OE_THIS, _OE_FROM, State, AdminId) when is_integer(AdminId) ->
423
423
    {reply, ?get_consumerAdmin(State, AdminId), State};
424
424
get_consumeradmin(_, _, _, What) ->
425
425
    orber:dbg("[~p] CosNotifyChannelAdmin_EventChannel:get_consumeradmin(~p);~n"
452
452
    end;
453
453
get_supplieradmin(_OE_THIS, _OE_FROM, State, 0) ->
454
454
    {reply, ?get_defSupplierAdm(State), State};
455
 
get_supplieradmin(_OE_THIS, _OE_FROM, State, AdminId) when integer(AdminId) ->
 
455
get_supplieradmin(_OE_THIS, _OE_FROM, State, AdminId) when is_integer(AdminId) ->
456
456
    {reply, ?get_supplierAdmin(State, AdminId), State};
457
457
get_supplieradmin(_, _, _, What) ->
458
458
    orber:dbg("[~p] CosNotifyChannelAdmin_EventChannel:get_supplieradmin(~p);~n"
674
674
        ok ->
675
675
            ?DBG("CHANNEL FORWARD ANY: ~p~n",[Event]),
676
676
            forward(any, T, State, Event, Status);
677
 
        {'EXCEPTION', E} when record(E, 'OBJECT_NOT_EXIST') ->
 
677
        {'EXCEPTION', E} when is_record(E, 'OBJECT_NOT_EXIST') ->
678
678
            orber:dbg("[~p] CosNotifyChannelAdmin_EventChannel:forward();~n"
679
679
                      "Admin no longer exists; dropping it: ~p", 
680
680
                      [?LINE, H], ?DEBUG_LEVEL),
697
697
        ok ->
698
698
            ?DBG("CHANNEL FORWARD SEQUENCE: ~p~n",[Event]),
699
699
            forward(seq, T, State, Event, Status);
700
 
        {'EXCEPTION', E} when record(E, 'OBJECT_NOT_EXIST') ->
 
700
        {'EXCEPTION', E} when is_record(E, 'OBJECT_NOT_EXIST') ->
701
701
            orber:dbg("[~p] CosNotifyChannelAdmin_EventChannel:forward();~n"
702
702
                      "Admin no longer exists; dropping it: ~p", 
703
703
                      [?LINE, H], ?DEBUG_LEVEL),