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

« back to all changes in this revision

Viewing changes to lib/cosNotification/src/CosNotifyChannelAdmin_SupplierAdmin_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:
390
390
%% Arguments: FilterID - long
391
391
%% Returns  : ok
392
392
%%-----------------------------------------------------------
393
 
remove_filter(_OE_THIS, _OE_FROM, State, FilterID) when integer(FilterID) ->
 
393
remove_filter(_OE_THIS, _OE_FROM, State, FilterID) when is_integer(FilterID) ->
394
394
    {reply, ok, ?del_Filter(State, FilterID)};
395
395
remove_filter(_,_,_,What) ->
396
396
    orber:dbg("[~p] CosNotifyChannelAdmin_SupplierAdmin:remove_filter(~p);~n"
403
403
%% Returns  : Filter - CosNotifyFilter::Filter |
404
404
%%            {'EXCEPTION', #'CosNotifyFilter_FilterNotFound'{}}
405
405
%%-----------------------------------------------------------
406
 
get_filter(_OE_THIS, _OE_FROM, State, FilterID) when integer(FilterID) ->
 
406
get_filter(_OE_THIS, _OE_FROM, State, FilterID) when is_integer(FilterID) ->
407
407
    {reply, ?get_Filter(State, FilterID), State};
408
408
get_filter(_,_,_,What) ->
409
409
    orber:dbg("[~p] CosNotifyChannelAdmin_SupplierAdmin:get_filter(~p);~n"
533
533
        ok ->
534
534
            ?DBG("SUPPLIERADM FORWARD ANY: ~p~n",[Event]),
535
535
            {noreply, State};
536
 
        {'EXCEPTION', E} when record(E, 'OBJECT_NOT_EXIST') ->
 
536
        {'EXCEPTION', E} when is_record(E, 'OBJECT_NOT_EXIST') ->
537
537
            orber:dbg("[~p] CosNotifyChannelAdmin_SupplierAdmin:forward();~n"
538
538
                      "Channel no longer exists; terminating and dropping: ~p", 
539
539
                      [?LINE, Event], ?DEBUG_LEVEL),
556
556
        ok ->
557
557
            ?DBG("SUPPLIERADM FORWARD SEQUENCE: ~p~n",[Event]),
558
558
            {noreply, State};
559
 
        {'EXCEPTION', E} when record(E, 'OBJECT_NOT_EXIST') ->
 
559
        {'EXCEPTION', E} when is_record(E, 'OBJECT_NOT_EXIST') ->
560
560
            orber:dbg("[~p] CosNotifyChannelAdmin_SupplierAdmin:forward();~n"
561
561
                      "Channel no longer exists; terminating and dropping: ~p", 
562
562
                      [?LINE, Event], ?DEBUG_LEVEL),