* test/automated/icalendar-tests.el (icalendar-tests--test-export)

(icalendar-tests--test-import): Remove debug messages.

diff --git a/test/ChangeLog b/test/ChangeLog
index f3d14786bd9addc00d80a5827455eed2b39fd0eb..65e7683dd54a3ba0501d03f845402bb9e344d3b5 100644 (file)
--- a/test/ChangeLog
+++ b/test/ChangeLog
@@ -2,6 +2,7 @@
 
        * automated/icalendar-tests.el (icalendar-tests--test-export)
        (icalendar-tests--test-import): Try more precise TZ specification.
+       Remove debug messages.
 
 2013-08-03  Glenn Morris  <rgm@gnu.org>
 

diff --git a/test/automated/icalendar-tests.el b/test/automated/icalendar-tests.el
index 227855681e8f633385a67d9bc27802cf3aadf9e3..f83052f5ea1db48dd6b8479b587f43076db99cda 100644 (file)
--- a/test/automated/icalendar-tests.el
+++ b/test/automated/icalendar-tests.el
@@ -433,9 +433,11 @@ and ISO style input data must use english month names."
        (icalendar-recurring-start-year 2000))
     (unwind-protect
        (progn
-         (message "Current time zone: %s" (current-time-zone))
+;;;      (message "Current time zone: %s" (current-time-zone))
+         ;; Use this form so as not to rely on system tz database.
+         ;; Eg hydra.nixos.org.
          (setenv "TZ" "CET-1CEST,M3.5.0/2,M10.5.0/3")
-         (message "Current time zone: %s" (current-time-zone))
+;;;      (message "Current time zone: %s" (current-time-zone))
          (when input-iso
            (let ((calendar-month-name-array
                   ["January" "February" "March" "April" "May" "June" "July" "August"
@@ -676,9 +678,11 @@ Argument EXPECTED-AMERICAN expected american style diary string."
   (let ((timezone (getenv "TZ")))
     (unwind-protect
        (progn
-         (message "Current time zone: %s" (current-time-zone))
+;;;      (message "Current time zone: %s" (current-time-zone))
+         ;; Use this form so as not to rely on system tz database.
+         ;; Eg hydra.nixos.org.
          (setenv "TZ" "CET-1CEST,M3.5.0/2,M10.5.0/3")
-         (message "Current time zone: %s" (current-time-zone))
+;;;      (message "Current time zone: %s" (current-time-zone))
          (with-temp-buffer
            (if (string-match "^BEGIN:VCALENDAR" input)
                (insert input)