Browse Source

user agent

master
boB Rudis 5 years ago
parent
commit
aa1211842b
No known key found for this signature in database GPG Key ID: 1D7529BE14E2BBA9
  1. 8
      R/aaa.R
  2. 1
      R/doh-query.R

8
R/aaa.R

@ -90,3 +90,11 @@ dlv = 32769
)
rr_types_rev <- set_names(names(rr_types), as.character(rr_types))
httr::user_agent(
sprintf(
"clandnstine package v%s: (<%s>)",
utils::packageVersion("clandnstine"),
utils::packageDescription("clandnstine")$URL
)
) -> .CLANDNSTINE_UA

1
R/doh-query.R

@ -27,6 +27,7 @@ doh_post <- function(name, type = "A", server_path = "https://dns.quad9.net/dns-
`Content-Type` = "application/dns-message",
`Accept` = "application/dns-message"
),
.CLANDNSTINE_UA,
encode = "raw",
body = q$pack()
) -> res

Loading…
Cancel
Save