← Back to branch summary

~ubuntu-branches/ubuntu/karmic/erlang/karmic-security

« back to all changes in this revision

Viewing changes to lib/orber/COSS/CosNaming/lname.erl

  • Committer: Bazaar Package Importer
  • Author(s): Sergei Golovan
  • Date: 2009-06-11 12:18:07 UTC
  • mfrom: (1.2.2 upstream)
  • Revision ID: james.westby@ubuntu.com-20090611121807-ks7eb4xrt7dsysgx
Tags: 1:13.b.1-dfsg-1
http://bugs.debian.org/529512
* New upstream release.
* Removed unnecessary dependency of erlang-os-mon on erlang-observer and
  erlang-tools and added missing dependency of erlang-nox on erlang-os-mon
  (closes: #529512).
* Removed a patch to eunit application because the bug was fixed upstream.

Show diffs side-by-side

added added

removed removed

Lines of Context:
lib/orber/COSS/CosNaming/lname.erl
52
52
    corba:raise(#'LName_NoComponent'{});
53
53
insert_component([], I, _) when I > 1->
54
54
    corba:raise(#'LName_NoComponent'{});
55
 
insert_component(Name, 1, Component) when record(Component,
56
 
                                                 'CosNaming_NameComponent') ->
 
55
insert_component(Name, 1, Component) when is_record(Component,
 
56
                                                    'CosNaming_NameComponent') ->
57
57
    [Component |Name];
58
 
insert_component([H|T], I, Component) when record(Component,
59
 
                                                  'CosNaming_NameComponent') ->
 
58
insert_component([H|T], I, Component) when is_record(Component,
 
59
                                                     'CosNaming_NameComponent') ->
60
60
    [H |insert_component(T, I-1, Component)];
61
61
insert_component(_, _, Component) -> 
62
62
    orber:dbg("[~p] ~p:insert_component(~p); Not a NameComponent.~n", 
111
111
    [];
112
112
new([{Id, Kind} | List]) ->
113
113
    [lname_component:new(Id, Kind) | new(List)];
114
 
new([Id |List]) when list(Id) ->
 
114
new([Id |List]) when is_list(Id) ->
115
115
    [lname_component:new(Id) | new(List)].
116
116
 
117
117
%%-----------------------------------------------------------------