do change for difftime result

MichaelChirico · web-flow · commit 30a5119cfd3d · 2025-07-25T16:32:44.000-07:00
diff --git a/R/IDateTime.R b/R/IDateTime.R
@@ -129,7 +129,8 @@ chooseOpsMethod.IDate = function(x, y, mx, my, cl, reverse) inherits(y, "Date")
     # ii) .Date was newly exposed in R some time after 3.4.4
   }
   ans = as.integer(unclass(e1) - unclass(e2))
-  if (!inherits(e2, "Date")) setattr(ans, "class", c("IDate", "Date"))
+  setattr(ans, "class", "difftime")
+  setattr(ans, "units", "days")
   ans
 }
 

Original file line number	Diff line number	Diff line change
`@@ -129,7 +129,8 @@ chooseOpsMethod.IDate = function(x, y, mx, my, cl, reverse) inherits(y, "Date")`
`129`	`129`	`# ii) .Date was newly exposed in R some time after 3.4.4`
`130`	`130`	`}`
`131`	`131`	`ans = as.integer(unclass(e1) - unclass(e2))`
`132`		`- if (!inherits(e2, "Date")) setattr(ans, "class", c("IDate", "Date"))`
	`132`	`+ setattr(ans, "class", "difftime")`
	`133`	`+ setattr(ans, "units", "days")`
`133`	`134`	`ans`
`134`	`135`	`}`
`135`	`136`