end
end
+redef class CmdEntityLink
+ redef fun http_init(req) do
+ text = req.string_arg("text")
+ title = req.string_arg("title")
+ return super
+ end
+end
+
redef class CmdAncestors
redef fun http_init(req) do
parents = req.bool_arg("parents") or else true
assert res isa WarningNoMDoc
end
+ # CmdEntityLink
+
+ fun test_cmd_http_link is test do
+ var req = new_request("/test_prog::Character")
+ var cmd = new CmdEntityLink(test_view)
+ var res = cmd.http_init(req)
+ assert res isa CmdSuccess
+ assert cmd.text == "Character"
+ assert cmd.title == "Characters can be played by both the human or the machine."
+ end
+
+ fun test_cmd_http_link_with_text is test do
+ var req = new_request("/test_prog::Character?text=foo")
+ var cmd = new CmdEntityLink(test_view)
+ var res = cmd.http_init(req)
+ assert res isa CmdSuccess
+ assert cmd.text == "foo"
+ assert cmd.title == "Characters can be played by both the human or the machine."
+ end
+
+ fun test_cmd_http_link_with_title is test do
+ var req = new_request("/test_prog::Character?title=bar")
+ var cmd = new CmdEntityLink(test_view)
+ var res = cmd.http_init(req)
+ assert res isa CmdSuccess
+ assert cmd.text == "Character"
+ assert cmd.title == "bar"
+ end
+
+ fun test_cmd_http_link_with_text_and_title is test do
+ var req = new_request("/test_prog::Character?text=foo&title=bar")
+ var cmd = new CmdEntityLink(test_view)
+ var res = cmd.http_init(req)
+ assert res isa CmdSuccess
+ assert cmd.text == "foo"
+ assert cmd.title == "bar"
+ end
+
# CmdInheritance
fun test_cmd_http_parents is test do