Coerce to XMP "language alternative" structure

Source: R/as_lang_alt.R

as_lang_alt() coerces to an XMP "language alternative" structure suitable for use with xmp() objects.

as_lang_alt(x, ...)

# S3 method for character
as_lang_alt(x, ..., default_lang = getOption("xmpdf_default_lang"))

# S3 method for lang_alt
as_lang_alt(x, ...)

# S3 method for list
as_lang_alt(x, ..., default_lang = getOption("xmpdf_default_lang"))

Arguments

x

Object suitable for coercing

...

Ignored

default_lang

Language tag value to copy as the "x-default"

Value

A named list of class "lang_alt".

See also

xmp(), as_xmp(), get_xmp(), and set_xmp(). For more information about the XMP "language alternative" structure see https://github.com/adobe/xmp-docs/blob/master/XMPNamespaces/XMPDataTypes/CoreProperties.md#language-alternative.

Examples

  as_lang_alt("A single title")
#> $`x-default`
#> [1] "A single title"
#> 
#> attr(,"class")
#> [1] "lang_alt"
  as_lang_alt(c(en = "An English Title", fr = "A French Title"))
#> $en
#> [1] "An English Title"
#> 
#> $fr
#> [1] "A French Title"
#> 
#> attr(,"class")
#> [1] "lang_alt"
  as_lang_alt(c(en = "An English Title", fr = "A French Title"), default_lang = "en")
#> $`x-default`
#> [1] "An English Title"
#> 
#> $en
#> [1] "An English Title"
#> 
#> $fr
#> [1] "A French Title"
#> 
#> attr(,"class")
#> [1] "lang_alt"
  as_lang_alt(list(en = "An English Title", fr = "A French Title"))
#> $en
#> [1] "An English Title"
#> 
#> $fr
#> [1] "A French Title"
#> 
#> attr(,"class")
#> [1] "lang_alt"