package devkit
Development kit - general purpose library
Install
Dune Dependency
Authors
Maintainers
Sources
devkit-1.20210517.tbz
md5=00995ebead339d6ec1ba7859c3fc3a58
sha256=5ad39c7fa1a966a2f0a7f6dbb7e82c787439c73482f5f44b3c9fb54b040d36eb
sha512=8dd3f7d4aaabae9aa9ede13edee2b22214c0d2e2780bb08b2ca8ed588d74fc6d9b1908bb31dfee49c949c7cc425fb98897b8e0f11280070ebd99b965908ea133
doc/devkit.core/Devkit_core/Web/index.html
Module Devkit_core.Web
Source
web utilities
percent-encode (convert space into %20)
percent-encode, but convert space into plus, not %20
percent-decode (leave plus as is)
percent-decode and convert plus into space
Minimum strictness, Neturl will fail on malformed parameters in url
Source
type http_action_old = [
| `GET
| `POST_FORM of (string * string) list
| `POST of string * string
| `PUT of string * string
| `DELETE
| `CUSTOM of string * string * string
]
Source
type ('body, 'ret) http_request_ =
?ua:string ->
?timeout:int ->
?verbose:bool ->
?setup:(Curl.t -> unit) ->
?timer:Action.timer ->
?max_size:int ->
?http_1_0:bool ->
?headers:string list ->
?body:'body ->
http_action ->
string ->
'ret
Source
type 'ret http_request =
([ `Form of (string * string) list | `Raw of string * string ], 'ret)
http_request_
Source
val show_result :
?verbose:bool ->
[< `Error of Curl.curlCode | `Ok of int * string ] ->
string
Source
val simple_result :
?is_ok:(int -> bool) ->
?verbose:bool ->
[< `Error of Curl.curlCode | `Ok of int * string Ok ] ->
[> `Error of string | `Ok of string ]
Source
val http_query :
(string * string, [> `Error of string | `Ok of string ])
Http_blocking.request_
Source
val http_submit :
?ua:string ->
?timeout:int ->
?verbose:bool ->
?setup:(Curl.t -> unit) ->
?timer:Action.timer ->
?http_1_0:bool ->
?headers:string list ->
?action:http_action ->
string ->
(string * string) list ->
[> `Error of string | `Ok of string ] Http_blocking.IO.t
Source
val http_query_lwt :
(string * string, [> `Error of string | `Ok of string ]) Http_lwt.request_
Source
val http_submit_lwt :
?ua:string ->
?timeout:int ->
?verbose:bool ->
?setup:(Curl.t -> unit) ->
?timer:Action.timer ->
?http_1_0:bool ->
?headers:string list ->
?action:http_action ->
string ->
(string * string) list ->
[> `Error of string | `Ok of string ] Http_lwt.IO.t
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>