amend to 372dabf: enforce relative conversion for date units only (all relative time units are similar and normally affecting relative seconds in UTC)

sebres · sebres · commit 067738944561 · 2025-03-13T15:21:32.000+01:00
diff --git a/generic/tclClock.c b/generic/tclClock.c
@@ -4551,13 +4551,13 @@ ClockAddObjCmd(
 	    yyRelSeconds += offs;
 	    break;
 	}
-	if (unitIndex != CLC_ADD_SECONDS) {
+	if (unitIndex < CLC_ADD_HOURS) { /* date units only */
 	    info->flags |= CLF_RELCONV;
 	}
     }
 
     /*
-     * Do relative times (if not yet already processed interim),
+     * Do relative units (if not yet already processed interim),
      * thereby ignore relative time (it can be processed within commit).
      */
 

Original file line number	Diff line number	Diff line change
`@@ -4551,13 +4551,13 @@ ClockAddObjCmd(`
`4551`	`4551`	`yyRelSeconds += offs;`
`4552`	`4552`	`break;`
`4553`	`4553`	`}`
`4554`		`- if (unitIndex != CLC_ADD_SECONDS) {`
	`4554`	`+ if (unitIndex < CLC_ADD_HOURS) { /* date units only */`
`4555`	`4555`	`info->flags \|= CLF_RELCONV;`
`4556`	`4556`	`}`
`4557`	`4557`	`}`
`4558`	`4558`
`4559`	`4559`	`/*`
`4560`		`- * Do relative times (if not yet already processed interim),`
	`4560`	`+ * Do relative units (if not yet already processed interim),`
`4561`	`4561`	`* thereby ignore relative time (it can be processed within commit).`
`4562`	`4562`	`*/`
`4563`	`4563`