(sweep_weak_table): Fix survival conditions for

[bpt/emacs.git] / src / vmstime.c

diff --git a/src/vmstime.c b/src/vmstime.c
index 4c4f2c0..4eec5d0 100644 (file)
--- a/src/vmstime.c
+++ b/src/vmstime.c
@@ -357,7 +357,7 @@ struct tm *sys_gmtime(time_t *clock)
   gmt.tm_hour = tmp_vectime.hour;
   gmt.tm_mday = tmp_vectime.day;
   gmt.tm_mon = tmp_vectime.month - 1;
-  gmt.tm_year = tmp_vectime.year % 100;
+  gmt.tm_year = tmp_vectime.year - 1900;
 
   tmp_operation = LIB$K_DAY_OF_WEEK;
   status = LIB$CVT_FROM_INTERNAL_TIME(&tmp_operation,