From 7fd817093fbbd746129e4d4db00779e64347d6ef Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Sun, 10 Sep 1995 04:36:12 +0000
Subject: [PATCH] (setenv): Call set-time-zone-rule when setting TZ.

---
 lisp/env.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lisp/env.el b/lisp/env.el
index 6a01a690d40..e78bbb314d9 100644
--- a/lisp/env.el
+++ b/lisp/env.el
@@ -92,6 +92,8 @@ This function works by modifying `process-environment'."
 	  (case-fold-search nil)
 	  (scan process-environment)
 	  found)
+      (if (string-equal "TZ" variable)
+	  (set-time-zone-rule value))
       (while scan
 	(cond ((string-match pattern (car scan))
 	       (setq found t)
-- 
2.39.2