diff options
| author | Glenn Morris | 2013-08-03 21:34:01 -0700 |
|---|---|---|
| committer | Glenn Morris | 2013-08-03 21:34:01 -0700 |
| commit | f8654242f1a06b4fd7a07ac261ecee240c9b3d69 (patch) | |
| tree | 80e0e793eacd16e7a269b4547c3c81fddf1bf1a5 | |
| parent | f0b79313d9be108a17b8a8c689fbf64f6ba75044 (diff) | |
| download | emacs-f8654242f1a06b4fd7a07ac261ecee240c9b3d69.tar.gz emacs-f8654242f1a06b4fd7a07ac261ecee240c9b3d69.zip | |
* test/automated/icalendar-tests.el (icalendar-tests--test-export)
(icalendar-tests--test-import): Remove debug messages.
| -rw-r--r-- | test/ChangeLog | 1 | ||||
| -rw-r--r-- | test/automated/icalendar-tests.el | 12 |
2 files changed, 9 insertions, 4 deletions
diff --git a/test/ChangeLog b/test/ChangeLog index f3d14786bd9..65e7683dd54 100644 --- a/test/ChangeLog +++ b/test/ChangeLog | |||
| @@ -2,6 +2,7 @@ | |||
| 2 | 2 | ||
| 3 | * automated/icalendar-tests.el (icalendar-tests--test-export) | 3 | * automated/icalendar-tests.el (icalendar-tests--test-export) |
| 4 | (icalendar-tests--test-import): Try more precise TZ specification. | 4 | (icalendar-tests--test-import): Try more precise TZ specification. |
| 5 | Remove debug messages. | ||
| 5 | 6 | ||
| 6 | 2013-08-03 Glenn Morris <rgm@gnu.org> | 7 | 2013-08-03 Glenn Morris <rgm@gnu.org> |
| 7 | 8 | ||
diff --git a/test/automated/icalendar-tests.el b/test/automated/icalendar-tests.el index 227855681e8..f83052f5ea1 100644 --- 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." | |||
| 433 | (icalendar-recurring-start-year 2000)) | 433 | (icalendar-recurring-start-year 2000)) |
| 434 | (unwind-protect | 434 | (unwind-protect |
| 435 | (progn | 435 | (progn |
| 436 | (message "Current time zone: %s" (current-time-zone)) | 436 | ;;; (message "Current time zone: %s" (current-time-zone)) |
| 437 | ;; Use this form so as not to rely on system tz database. | ||
| 438 | ;; Eg hydra.nixos.org. | ||
| 437 | (setenv "TZ" "CET-1CEST,M3.5.0/2,M10.5.0/3") | 439 | (setenv "TZ" "CET-1CEST,M3.5.0/2,M10.5.0/3") |
| 438 | (message "Current time zone: %s" (current-time-zone)) | 440 | ;;; (message "Current time zone: %s" (current-time-zone)) |
| 439 | (when input-iso | 441 | (when input-iso |
| 440 | (let ((calendar-month-name-array | 442 | (let ((calendar-month-name-array |
| 441 | ["January" "February" "March" "April" "May" "June" "July" "August" | 443 | ["January" "February" "March" "April" "May" "June" "July" "August" |
| @@ -676,9 +678,11 @@ Argument EXPECTED-AMERICAN expected american style diary string." | |||
| 676 | (let ((timezone (getenv "TZ"))) | 678 | (let ((timezone (getenv "TZ"))) |
| 677 | (unwind-protect | 679 | (unwind-protect |
| 678 | (progn | 680 | (progn |
| 679 | (message "Current time zone: %s" (current-time-zone)) | 681 | ;;; (message "Current time zone: %s" (current-time-zone)) |
| 682 | ;; Use this form so as not to rely on system tz database. | ||
| 683 | ;; Eg hydra.nixos.org. | ||
| 680 | (setenv "TZ" "CET-1CEST,M3.5.0/2,M10.5.0/3") | 684 | (setenv "TZ" "CET-1CEST,M3.5.0/2,M10.5.0/3") |
| 681 | (message "Current time zone: %s" (current-time-zone)) | 685 | ;;; (message "Current time zone: %s" (current-time-zone)) |
| 682 | (with-temp-buffer | 686 | (with-temp-buffer |
| 683 | (if (string-match "^BEGIN:VCALENDAR" input) | 687 | (if (string-match "^BEGIN:VCALENDAR" input) |
| 684 | (insert input) | 688 | (insert input) |