← Back to branch summary

~ubuntu-branches/ubuntu/trusty/erlang/trusty

« back to all changes in this revision

Viewing changes to lib/orber/src/orber_iiop_inrequest.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/src/orber_iiop_inrequest.erl
133
133
    %% do it due to performance reasons.
134
134
    put(oe_orber_flags, Env#giop_env.flags),
135
135
    case catch cdr_decode:dec_message_header(null, GIOPHdr, Message) of
136
 
        Hdr when record(Hdr, cancel_request_header) ->
 
136
        Hdr when is_record(Hdr, cancel_request_header) ->
137
137
            %% We just skips this message for the moment, the standard require that 
138
138
            %% the client handles the reply anyway.
139
139
            message_error;
148
148
            Reply = handle_locate_request(Env#giop_env{version = Version}, 
149
149
                                          {object_forward, Object, ReqId}),
150
150
            orber_socket:write(SocketType, Socket, Reply);
151
 
        {Version, Hdr} when record(Hdr, locate_request_header) ->
 
151
        {Version, Hdr} when is_record(Hdr, locate_request_header) ->
152
152
            Reply = handle_locate_request(Env#giop_env{version = Version}, Hdr),
153
153
            orber_socket:write(SocketType, Socket, Reply);
154
 
        {Version, ReqHdr, Rest, Len, ByteOrder} when record(ReqHdr, request_header) ->
 
154
        {Version, ReqHdr, Rest, Len, ByteOrder} when is_record(ReqHdr, request_header) ->
155
155
            handle_request(Env#giop_env{version = Version}, ReqHdr, Rest, Len, 
156
156
                           ByteOrder, SocketType, Socket, Message);
157
157
        Other ->