OpenID consumer implementation
REQUIRES EiffelStudio 7.2
This commit is contained in:
@@ -1,59 +0,0 @@
|
||||
note
|
||||
description: "Summary description for {OPENID_DISCOVER}."
|
||||
author: ""
|
||||
date: "$Date$"
|
||||
revision: "$Revision$"
|
||||
|
||||
class
|
||||
OPENID_DISCOVER
|
||||
|
||||
create
|
||||
make
|
||||
|
||||
feature {NONE} -- Initialization
|
||||
|
||||
make (a_server_uri: READABLE_STRING_8; a_version: like version)
|
||||
do
|
||||
version := a_version
|
||||
server_uri := a_server_uri
|
||||
end
|
||||
|
||||
feature -- Access
|
||||
|
||||
version: INTEGER
|
||||
server_uri: READABLE_STRING_8
|
||||
delegate: detachable READABLE_STRING_8 assign set_delegate
|
||||
ax_supported: BOOLEAN assign set_ax_supported
|
||||
sreg_supported: BOOLEAN assign set_sreg_supported
|
||||
identifier_select: BOOLEAN assign set_identifier_select
|
||||
|
||||
has_error: BOOLEAN assign set_has_error
|
||||
|
||||
feature -- Change
|
||||
|
||||
set_delegate (v: like delegate)
|
||||
do
|
||||
delegate := v
|
||||
end
|
||||
|
||||
set_ax_supported (v: like ax_supported)
|
||||
do
|
||||
ax_supported := v
|
||||
end
|
||||
|
||||
set_sreg_supported (v: like sreg_supported)
|
||||
do
|
||||
sreg_supported := v
|
||||
end
|
||||
|
||||
set_identifier_select (v: like identifier_select)
|
||||
do
|
||||
identifier_select := v
|
||||
end
|
||||
|
||||
set_has_error (v: like has_error)
|
||||
do
|
||||
has_error := v
|
||||
end
|
||||
|
||||
end
|
||||
Reference in New Issue
Block a user