changing maintainer email does not work as expected

[LiNk-NY]

Hi Gábor, @gaborcsardi

I am interested in changing only the maintainer email from the Authors@R field.
I tried to use change_maintainer function but it is not changing the email
as expected (see the reprex below).

Is this the right way to think about it?
I also tried desc_change_maintainer and it didn't work either.

Thanks!

suppressPackageStartupMessages(library(desc))
desctext <- "
Package: Foo
Title: A test package
Version: 0.99.0
Authors@R: c(
    person('John', 'Snow', email = 'john.snow@email.com',
    role = c('aut', 'cre')
    )
  )
Description: This is a test.
Depends:
    R (>= 3.0.0)
Encoding: UTF-8
"
desc <- desc(text = desctext)
desc <- desc[["change_maintainer"]](
    email = "john.snow@newmail.edu",
)
desc$get_maintainer()
#> [1] "John Snow <john.snow@email.com>"

^{Created on 2024-08-22 with reprex v2.1.1}

I am using

> packageVersion("desc")
[1] '1.4.3'

[gaborcsardi]

change_maintainer() changes the maintainer to another author. I.e. it only changes the roles of two authors.

[LiNk-NY]

I see, it looks for the person with the email provided and changes that person's role. Thanks.

[LiNk-NY]

For anyone interested, here is how I changed the maintainer email when there is a single author present:

suppressPackageStartupMessages(library(desc))
desctext <- "
Package: Foo
Title: A test package
Version: 0.99.0
Authors@R: c(
    person('John', 'Snow', email = 'john.snow@email.com',
    role = c('aut', 'cre')
    )
  )
Description: This is a test.
Depends:
    R (>= 3.0.0)
Encoding: UTF-8
"
desc <- desc(text = desctext)
desc$add_author(
    given = "John", family = "Snow",
    email = "john.snow@newemail.edu"
)
desc$change_maintainer(
    given = "John", family = "Snow",
    email = "john.snow@newemail.edu"
)
desc$add_role(
    role = "aut",
    given = "John", family = "Snow",
    email = "john.snow@newemail.edu"
)
desc$del_author(
    given = "John", family = "Snow",
    email = "john.snow@email.com",
)
#> Author removed: John Snow.
desc
#> Package: Foo
#> Title: A test package
#> Version: 0.99.0
#> Authors@R (parsed):
#>     * John Snow <john.snow@newemail.edu> [cre, aut]
#> Description: This is a test.
#> Depends:
#>     R (>= 3.0.0)
#> Encoding: UTF-8

^{Created on 2024-08-22 with reprex v2.1.1}