[Oorexx-svn] SF.net SVN: oorexx:[5476] main/trunk/extensions/rxsock/socket.cls

[<dar...@us...>]

Revision: 5476
          http://oorexx.svn.sourceforge.net/oorexx/?rev=5476&view=rev
Author:   darthapache
Date:     2010-01-05 17:33:12 +0000 (Tue, 05 Jan 2010)

Log Message:
-----------
fixed spelling error raised by duselguy in bug tracker 2926003 and an extraneous argument to SockGetSockName.

Modified Paths:
--------------
    main/trunk/extensions/rxsock/socket.cls

Modified: main/trunk/extensions/rxsock/socket.cls
===================================================================
--- main/trunk/extensions/rxsock/socket.cls	2010-01-04 23:28:52 UTC (rev 5475)
+++ main/trunk/extensions/rxsock/socket.cls	2010-01-05 17:33:12 UTC (rev 5476)
@@ -373,7 +373,7 @@
 if optvals~hasItem(name) = .false then ,
  raise syntax 93.914 array (1, optvals~toString, name)
 -- get the value
-retc = SockGetSendOpt(s, 'SOL_SOCKET', name, 'xxx')
+retc = SockGetSockOpt(s, 'SOL_SOCKET', name, 'xxx')
 -- some values may not be gettable
 if retc = -1 then do
    errno = self~convert_err_number(SockSock_errno())
@@ -408,7 +408,7 @@
 ::method getSockName
 expose s errno
 use strict arg
-retc = SockGetSockName(s, cmd, 'stem.!')
+retc = SockGetSockName(s, 'stem.!')
 if retc = -1 then do
    errno = self~convert_err_number(SockSock_errno())
    return .nil


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.