From @uh@rto_@nggono @end|ng |rom y@hoo@com  Mon Nov 25 17:38:09 2024
From: @uh@rto_@nggono @end|ng |rom y@hoo@com (Suharto Anggono Suharto Anggono)
Date: Mon, 25 Nov 2024 16:38:09 +0000 (UTC)
Subject: [Rd] Alternative to some recently changed parts of dates.R and
 datetime.R
References: <955678192.2644007.1732552689750.ref@mail.yahoo.com>
Message-ID: <955678192.2644007.1732552689750@mail.yahoo.com>

In?function?'Summary.Date'?in?dates.R?,
..1
could?be?used?instead?of
...elt(1L)

In?function?'format.POSIXlt'?in?datetime.R?,
unlist(unclass(x)[1L:3L],?use.names=FALSE)
could?be?used?instead?of
unlist(`names<-`(unclass(x)[1L:3L],?NULL))
Also, the fragment
secs <- x$sec[f0]; secs <- secs[is.finite(secs)]
could be put inside
if(np?>=?1L)



[Rd] Alternative to some recently changed parts of dates.R and datetime.R
Suharto Anggono Suharto Anggono