amend c88441 (wrong att.)

git-svn-id: https://svn.r-project.org/R/trunk@88442 00db46b3-68df-0310-9c12-caf00c1e9a41

Author: maechler

src/library/base/R/datetime.R

@@ -1566,7 +1566,7 @@ as.list.POSIXlt <- function(x, ...)
 `[[<-.POSIXlt` <- function(x, i, value)
 {
     cl <- oldClass(x)
-    class(x) <- unCfillPOSIXlt(x)
+    x <- unCfillPOSIXlt(x)
 
     if(!missing(i) && is.character(i)) {
         nms <- names(x$year)