desc_get_built() reads multiples lines

[seankross]

Fixes #145

[krlmlr]

Thanks! I like your test case, could we simplify the logic?

[krlmlr]

Could be as simple as replacing $get() with $get_field() :

writeLines(
  c(
    "Type: package",
    "Built: R 3.4.1; x86_64-apple-darwin15.6.0;\n  2017-09-14 20:30:19 UTC; unix"
  ),
  "DESCRIPTION"
)

desc <- desc::desc(file = "DESCRIPTION")

desc$get("Built")
#>                                                                  Built 
#> "R 3.4.1; x86_64-apple-darwin15.6.0;\n  2017-09-14 20:30:19 UTC; unix"
desc$get_field("Built")
#> [1] "R 3.4.1; x86_64-apple-darwin15.6.0; 2017-09-14 20:30:19 UTC; unix"

^{Created on 2024-08-16 with reprex v2.1.0}

[gaborcsardi]

Thank you!