Update release notes for 04.02.05.

Bump version to 04.02.05.
Diagnose common error.
2026-04-16 14:28:40 +02:00 · 2023-04-11 08:25:54 -04:00 · 2023-04-11 08:22:10 -04:00 · 2023-04-10 08:51:25 -04:00 · 2023-04-09 10:44:34 -04:00 · 2023-03-19 09:47:12 -04:00
38 changed files with 1990 additions and 1324 deletions
--- a/4
+++ b/4
@@ -3817,7 +3817,7 @@ _ACEOF



-for ac_header in sys/types.h sys/file.h glob.h wctype.h locale.h langinfo.h
+for ac_header in sys/types.h glob.h wctype.h locale.h langinfo.h
 do :
  as_ac_Header=`$as_echo "ac_cv_header_$ac_header" | $as_tr_sh`
 ac_fn_c_check_header_mongrel "$LINENO" "$ac_header" "$as_ac_Header" "$ac_includes_default"
@@ -4025,7 +4025,7 @@ _ACEOF
 fi
 done

-VERSION=04.02.02
+VERSION=04.02.05



--- a/configure.in
+++ b/configure.in
@@ -35,7 +35,7 @@ AC_CHECK_SIZEOF(unsigned int)
 AC_CHECK_SIZEOF(unsigned long)

 dnl Checks for header files.
-AC_CHECK_HEADERS(sys/types.h sys/file.h glob.h wctype.h locale.h langinfo.h)
+AC_CHECK_HEADERS(sys/types.h glob.h wctype.h locale.h langinfo.h)

 dnl Checks for typedefs, structures, and compiler characteristics.
 AC_STRUCT_TM
@@ -80,7 +80,7 @@ if test "$?" != 0 ; then
    exit 1
 fi
 AC_CHECK_FUNCS(setenv unsetenv glob mbstowcs setlocale initgroups)
-VERSION=04.02.02
+VERSION=04.02.05
 AC_SUBST(VERSION)
 AC_SUBST(PERL)
 AC_SUBST(PERLARTIFACTS)
--- a/docs/WHATSNEW
+++ b/docs/WHATSNEW
@@ -1,5 +1,93 @@
 CHANGES TO REMIND

+* VERSION 4.2 Patch 5 - 2023-04-11
+
+- MINOR IMPROVEMENT: remind: If someone uses OMIT yyyy-mm-dd UNTIL yyyy-mm-dd
+  give a better error message suggesting THROUGH instead of UNTIL.
+
+- BUG FIX: remind: The fix for the combination of ADDOMIT and SATISFY that
+  appeared in version 04.02.00 was not complete; the bug has finally been
+  properly fixed.
+
+- BUG FIX: remind: Remove an unnecessary #include <sys/file.h>.
+  Nothing needed that and it broke compilation on FreeBSD.
+
+* VERSION 4.2 Patch 4 - 2023-03-15
+
+- NEW FEATURE: Remind: Add "htmlescape" and "htmlstriptags" built-in
+  functions.
+
+- NEW FEATURE: Rem2PDF: Add the "--wrap, -y" option to ensure that no
+  printed calendar takes up more than 5 rows.  If a calendar would normally
+  require 6 rows, wrap it so the last day or two appear on the first
+  row instead of on a sixth row.
+
+- NEW FEATURE: Remind: Improve the -k option to allow specification of
+  separate commands for immediately-issued vs. queued reminders.  For
+  example:
+
+     remind '-kcmd1 %s' '-k:cmd2 %s' ...
+
+  will use "cmd1" for immediately-issued reminders and "cmd2" for queued
+  ones.  If you only use '-k:cmd2 %s' then immediately-issued reminders
+  are simply printed as usual rather than being passed to a command.
+
+- IMPROVEMENT: Remind:  Make "SPECIAL MSG" the same as just "MSG" and
+  the same for MSF, RUN, PS and PSFILE.  This effectively lets you use
+  expression-pasting to determine the type of a REM command; see the
+  remind(1) man page for details.
+
+- MINOR IMPROVEMENT: If "make test" fails, output up to 200 lines of diff
+  so we can see immediately what failed.
+
+- DOCUMENTATION FIX: Fix some typos; fix TkRemind syntax description.
+
+- TEST FIX: Make tests run reliably regardless of local machine's time zone.
+
+- BUG FIX: TkRemind: Don't crash if local installation of Tk lacks the
+  -underlinefg configuration option.
+
+- BUG FIX: examples/defs.rem: Fix up US Thanksgiving example.
+
+- BUG FIX: include/holidays/us.rem: Add logic for US holidays that are
+  observed on a Friday if the holiday is a Saturday, or on a Monday if the
+  holiday is a Sunday.
+
+- BUG FIX: TkRemind: Don't cut off MOON text at the first white-space
+  character.
+
+- BUG FIX: Remind: prevent functions defined on the command-line (as in
+  remind '-if(x)=whatever') from segfaulting.
+
+* VERSION 4.2 Patch 3 - 2023-02-10
+
+- NEW FEATURE: Remind: add the orthodoxeaster() function to return the
+  date of Orthodox Easter.
+
+- IMPROVEMENT: Add Greek language support courtesy of JeiEl.
+
+- IMPROVEMENT: Add Greek holiday file courtesy of JeiEl.
+
+- IMPROVEMENT: Fix the Perl code (rem2pdf, rem2html) to silence Perl::Critic
+  warnings
+
+- IMPROVEMENT: Many internal code tweaks to eliminate many cppcheck
+  static analysis warnings.
+
+- DOCUMENTATION IMPROVEMENT: Clarify the distinction between a "time"
+  and a "duration" as suggested by Ian! D. Allen.
+
+- BUG FIX: Remind: Fix incorrect interaction between sortbanner() and
+  MSF-type reminders.  Bug found by Tim Chase.
+
+- BUG FIX: examples/defs.rem: Fix the calculation of US Tax Day as per
+  Tavis Ormandy and Tim Chase.  Also fixed in include/holidays/us.rem
+
+- BUG FIX: Remind: Add missing #include <fcntl.h> to funcs.c
+
+- BUG FIX: Remind: Fix undefined integer-overflow behavior in built-in abs()
+  function.  Pointed out on IRC by "ubitux".
+
 * VERSION 4.2 Patch 2 - 2023-01-01

 - NEW FEATURE: Remind: Add the NOQUEUE modifier to the REM statement for
--- a/examples/defs.rem
+++ b/examples/defs.rem
@@ -42,7 +42,6 @@ SET  Week_1		 1
 SET  Week_2		 8
 SET  Week_3		15
 SET  Week_4		22
-FSET _last(mo)		"1 " + MON((mo%12)+1) + " --7"

 #################################################################
 # Function that removes a single leading zero from a string...  #
@@ -126,6 +125,8 @@ REM Sat Sun SPECIAL SHADE 220
 # The following holidays were provided by Dave Rickel			    #
 # Modified by D. Skoll to give safe OMITs for moveable holidays		    #
 #									    #
+# NOTE: See include/holidays/us.rem for more up-to-date definitions         #
+#									    #
 #############################################################################

 SET SaveTrig $NumTrig
@@ -157,7 +158,24 @@ REM Last Sunday in October ++2 UNTIL 1 Jan 2007 MSG Daylight Saving Time - %"DST
 REM First Sunday in November ++2 FROM 1 Jan 2007 MSG Daylight Saving Time - %"DST ends%" %b

 REM     Apr  1		MSG %"April Fool's%" Day
-REM Mon Tue Wed Thu Fri Sat 15 Apr MSG %"Income tax%" due
+
+# US Tax Day
+PUSH-OMIT-CONTEXT
+# Normal case: 16 April falls Mon-Fri
+REM 16 Apr SCANFROM -7 ADDOMIT SATISFY [$Tw >= 1 && $Tw <= 5] MSG Emancipation Day
+
+# 16 April falls on Saturday: Observe on the 15th
+REM 15 Apr SCANFROM -7 ADDOMIT SATISFY [$Tw == 5] MSG Emancipation Day (observed)
+
+# 16 April falls on Sunday: Observe on the 17th
+REM 17 Apr SCANFROM -7 ADDOMIT SATISFY [$Tw == 1] MSG Emancipation Day (observed)
+
+# If you live in Maine or Massachussetts, uncomment the next line
+# REM Third Monday in April SCANFROM -7 ADDOMIT MSG Patriots Day
+
+REM Apr 15 OMIT Sat Sun AFTER MSG Tax Day
+POP-OMIT-CONTEXT
+
 REM     May  5		MSG %"Cinco de Mayo%"
 REM First Sat in May 	MSG %"Kentucky Derby%"
 REM Second Sun in May	MSG %"Mother's Day%"
@@ -172,7 +190,7 @@ REM     Nov 11		MSG %"Veterans Day%"
 REM     Oct 30		MSG %"Mischief Night%"
 REM     Oct 31		MSG %"Halloween%"
 REM Tue Nov  2 SCANFROM -7 SATISFY [($Ty % 4) == 0] MSG %"Election Day%"
-REM Last Thu in Nov 	SCANFROM -7 ADDOMIT MSG %"Thanksgiving Day%"
+REM Thu Nov [Week_4]	SCANFROM -7 ADDOMIT MSG %"Thanksgiving Day%"
 REM Fri Nov [Week_4+1]	SCANFROM -7 ADDOMIT MSG %"Thanksgiving (cont.)%"
 OMIT    Dec 24		MSG %"Christmas Eve%"
 OMIT    Dec 25		MSG %"Christmas%" Day
--- a/include/holidays/gr.rem
+++ b/include/holidays/gr.rem
@@ -0,0 +1,39 @@
+# Greek national holidays
+# ΑΡΓΙΕΣ (για όλους)
+
+# fixed
+REM 1 Jan MSG ΠΡΩΤΟΧΡΟΝΙΑ
+REM 6 Jan MSG ΤΑ ΦΩΤΑ/ ΘΕΟΦΑΝΕΙΑ
+REM 25 Mar MSG η 25η Μαρτίου
+REM 15 Aug MSG 15Αύγουστος
+REM 28 Oct MSG ΟΧΙ
+REM 25 Dec MSG ΧΡΙΣΤΟΥΓΕΝΝΑ
+REM 26 Dec MSG ΧΡΙΣΤΟΥΓΕΝΝΑ2
+
+REM [orthodoxeaster($Uy)+1] ΔΕΥΤΕΡΑ ΤΟΥ ΠΑΣΧΑ
+
+
+# May first is a national holiday except if Sunday, day of great week (week before easter) or Monday after easter, then
+# minister decides moving that holiday. Here is a likely  assumption of how this day might be moved.
+# Uncomment following lines to enable.
+
+set PM date($Uy,5,1)
+# IF PM>=orthodoxeaster($Uy)-7 && PM<=orthodoxeaster($Uy)+1
+# IF PM<orthodoxeaster($Uy)-3
+# REM orthodoxeaster($Uy) -8 MSG πιθανόν ΕΡΓΑΤΙΚΗ Πρωτομαγιά
+# ELSE
+# REM [plusfunc(2)] MSG πιθανόν ΕΡΓΑΤΙΚΗ Πρωτομαγιά
+# ENDIF
+# ENDIF
+# REM [PM] OMIT Sun AFTER MSG Πρωτομαγιά
+
+REM 1 May MSG Πρωτομαγιά
+# end of May 1 speculations
+
+# The following are main national holidays per custom (observed by most but not all)
+REM [orthodoxeaster($Uy)] -48 MSG Καθαρά Δευτέρα
+REM [orthodoxeaster($Uy)] -2 MSG Μεγάλη Παρασκευή
+REM [orthodoxeaster($Uy)] -1 MSG Μεγάλο Σάββατο
+REM [orthodoxeaster($Uy)+50] MSG Αγίου Πνεύματος
+
+
--- a/include/holidays/us.rem
+++ b/include/holidays/us.rem
@@ -14,6 +14,9 @@ REM  [easterdate($Uy)+49] MSG Pentecost
 # which ones are omitted.

 OMIT Jan 1 MSG New Year's Day
+REM 31 Dec SCANFROM -7 ADDOMIT SATISFY [$Tw==5] MSG New Year's Day (observed)
+REM 2 Jan SCANFROM -7 ADDOMIT SATISFY [$Tw==1] MSG New Year's Day (observed)
+
 REM Third Monday in Jan MSG Martin Luther King - %"MLK Day%"
 REM Feb 2 MSG Ground Hog Day
 REM Feb 14 MSG Valentine's Day
@@ -21,11 +24,27 @@ REM Third Monday in Feb SCANFROM -7 ADDOMIT MSG President's Day
 REM Mar 17 MSG St. Patrick's Day

 # These are accurate for most places in North America
-REM MAYBE-UNCOMPUTABLE Sun November SATISFY [isdst($T) != isdst($T+1)] MSG Daylight Saving Time Ends
-REM MAYBE-UNCOMPUTABLE Sun March SATISFY [isdst($T) != isdst($T+1)] MSG Daylight Saving Time Starts
+REM MAYBE-UNCOMPUTABLE Sun November SATISFY [isdst($T) && !isdst($T+1)] MSG Daylight Saving Time Ends
+REM MAYBE-UNCOMPUTABLE Sun March SATISFY [!isdst($T) && isdst($T+1)] MSG Daylight Saving Time Starts

 REM Apr 1 MSG %"April Fool's%" Day
-REM Mon Tue Wed Thu Fri Sat 15 Apr MSG %"Income tax%" due
+
+PUSH-OMIT-CONTEXT
+# Normal case: 16 April falls Mon-Fri
+REM 16 Apr SCANFROM -7 ADDOMIT SATISFY [$Tw >= 1 && $Tw <= 5] MSG Emancipation Day
+
+# 16 April falls on Saturday: Observe on the 15th
+REM 15 Apr SCANFROM -7 ADDOMIT SATISFY [$Tw == 5] MSG Emancipation Day (observed)
+
+# 16 April falls on Sunday: Observe on the 17th
+REM 17 Apr SCANFROM -7 ADDOMIT SATISFY [$Tw == 1] MSG Emancipation Day (observed)
+
+# If you live in Maine or Massachussetts, uncomment the next line
+# REM Third Monday in April SCANFROM -7 ADDOMIT MSG Patriots Day
+
+REM Apr 15 OMIT Sat Sun AFTER MSG %"Income tax%" due
+POP-OMIT-CONTEXT
+
 REM May 5 MSG Cinco de Mayo
 REM First Sat in May MSG Kentucky Derby
 REM Second Sun in May MSG Mother's Day
@@ -33,14 +52,21 @@ REM Third Sat in May MSG Armed Forces Day
 REM Last Monday in May SCANFROM -7 ADDOMIT MSG Memorial Day
 REM Jun 14 MSG Flag Day

+OMIT 19 June MSG Juneteenth
+REM 18 June SCANFROM -7 ADDOMIT SATISFY [$Tw==5] MSG Juneteenth (observed)
+REM 20 June SCANFROM -7 ADDOMIT SATISFY [$Tw==1] MSG Juneteenth (observed)
+
 REM July 4 SCANFROM -7 ADDOMIT MSG Independence Day
-REM July 3 SCANFROM -7 ADDOMIT SATISFY [$Tw == 5] MSG Independence Day (observed)
-REM July 5 SCANFROM -7 ADDOMIT SATISFY [$Tw == 1] MSG Independence Day (observed)
+REM July 3 SCANFROM -7 ADDOMIT SATISFY [$Tw==5] MSG Independence Day (observed)
+REM July 5 SCANFROM -7 ADDOMIT SATISFY [$Tw==1] MSG Independence Day (observed)

 REM Third Sun in June MSG Father's Day
 REM First Mon in Sep SCANFROM -7 ADDOMIT MSG Labor Day
 REM Second Mon in Oct MSG Columbus Day / Indigenous Peoples' Day
-REM Nov 11 MSG Veterans Day
+
+OMIT 11 Nov MSG Veterans Day
+REM 10 Nov SCANFROM -7 ADDOMIT SATISFY [$Tw==5] MSG Veterans Day (observed)
+REM 12 Nov SCANFROM -7 ADDOMIT SATISFY [$Tw==1] MSG Veterans Day (observed)

 REM Oct 30 MSG Mischief Night
 REM Oct 31 MSG Halloween
@@ -48,8 +74,9 @@ REM Oct 31 MSG Halloween
 REM Tue Nov  2 SCANFROM -7 SATISFY [($Ty % 4) == 0] MSG Election Day

 REM Thu 22 Nov SCANFROM -7 ADDOMIT MSG Thanksgiving Day
-
 REM Fri 23 Nov SCANFROM -7 ADDOMIT MSG Thanksgiving (cont.)

 REM Dec 24 MSG Christmas Eve
 OMIT Dec 25 MSG %"Christmas%" Day
+REM 24 Dec SCANFROM -7 ADDOMIT SATISFY [$Tw==5] MSG Christmas (observed)
+REM 26 Dec SCANFROM -7 ADDOMIT SATISFY [$Tw==1] MSG Christmas (observed)
--- a/include/lang/auto.rem
+++ b/include/lang/auto.rem
@@ -1,5 +1,9 @@
 # SPDX-License-Identifier: GPL-2.0-only
-SET autolang getenv("LC_ALL")
+SET autolang getenv("REMIND_LANG")
+
+IF autolang == ""
+    SET autolang getenv("LC_ALL")
+ENDIF
 IF autolang == ""
    SET autolang getenv("LANGUAGE")
 ENDIF
--- a/include/lang/gr.rem
+++ b/include/lang/gr.rem
@@ -0,0 +1,83 @@
+# Support for the Hellenic (Greek) language.
+# This file is part of REMIND.
+# REMIND is Copyright (C) 1992-2023 by Dianne Skoll
+# This file is derived from a translation by jarlaxl lamat (jarlaxl@freemail.gr)
+
+SET $Sunday "Κυριακή"
+SET $Monday "Δευτέρα"
+SET $Tuesday "Τρίτη"
+SET $Wednesday "Τετάρτη"
+SET $Thursday "Πέμπτη"
+SET $Friday "Παρασκευή"
+SET $Saturday "Σάββατο"
+
+SET $January "Ιανουάρ."
+SET $February "Φεβρουάρ."
+SET $March "Μάρτ."
+SET $April "Απρίλ."
+SET $May "Μαι."
+SET $June "Ιούν."
+SET $July "Ιούλ."
+SET $August "Αυγουστ."
+SET $September "Σεπτέμβρ."
+SET $October "Οκτώβρ."
+SET $November "Νοέμβρ."
+SET $December "Δεκέμβρ."
+
+SET $Today "σήμερα"
+SET $Tomorrow "αύριο"
+
+BANNER Υπενθυμίσεις: %w, %d %m, %y%o:
+
+SET $Am "πμ"
+SET $Pm "μμ"
+
+SET $Ago "πριν"
+SET $Fromnow "από τώρα"
+
+SET $On "την"
+
+SET $Now "τώρα"
+SET $At "στις"
+SET $Minute "λεπτά"
+SET $Hour "ώρες"
+SET $Is "είναι"
+SET $Was "ήταν"
+SET $And "και"
+SET $Hplu ""
+SET $Mplu ""
+
+FSET subst_bx(a, d, t) "σε " + (d - today()) + " ημέρες"
+FSET subst_ordinal(d)   "."
+FSET subst_a_alt(d)     wkday(d) + ", " + day(d) + ". " + mon(d) + " " + year(d)
+FSET subst_ax(alt, d, t) iif(alt, subst_a_alt(d), $On + " " + subst_a_alt(d))
+FSET subst_g_alt(d)     wkday(d) + ", " + day(d) + ". " + mon(d)
+FSET subst_gx(alt, d, t) iif(alt, subst_g_alt(d), $On + " " + subst_g_alt(d))
+FSET subst_ux(alt, d, t) subst_ax(alt, d, t)
+FSET subst_vx(alt, d, t) subst_gx(alt, d, t)
+
+# Localization of various astronomical events
+
+# Perihelion
+SET earthseasons_Perihelion_str  "Περιήλιον"
+
+# Vernal equinox
+SET earthseasons_EquinoxMar_str  "Εαρινή ισημερία"
+
+# Summer solstice
+SET earthseasons_SolsticeJun_str "Θερινό ηλιοστάσιο"
+
+# Aphelion
+SET earthseasons_Aphelion_str    "Αφήλιον"
+
+# Autumnal Equinox
+SET earthseasons_EquinoxSep_str  "Φθινοπωρινή ισημερία"
+
+# Winter Solstice
+SET earthseasons_SolsticeDec_str "Χειμερινό ηλιοστάσιο"
+
+# Daylight saving time starts
+SET daylightST_starts_str        "Έναρξη θέρους"
+
+# Daylight saving time ends
+SET daylightST_ends_str          "Τέλος θέρους"
--- a/man/remind.1.in
+++ b/man/remind.1.in
@@ -328,6 +328,18 @@ processes with the above technique.  So be very careful.  Because all
 shell and whitespace characters are escaped, the program you execute
 with the \fB\-k\fR option must be prepared to handle the entire
 message as a single argument.
+.PP
+If you follow the \fB\-k\fR option with a colon, then the command is applied
+only to queued timed reminders.  Normal reminders are handled as usual.
+In the above example, if you want normal reminders to simply be displayed
+as usual, but queued reminders to be sent to notify-send, you could use:
+.PP
+.nf
+		remind '\-k:notify-send %s &' ...
+.fi
+.PP
+You use both \fB\-k\fR\fIcmd1\fR and \fB\-k:\fR\fIcmd2\fR to use different
+commands for queued versus non-queued reminders.
 .RE
 .TP
 \fB\-z\fR[\fIn\fR] Runs \fBRemind\fR in the daemon mode.  If \fIn\fR
@@ -1006,7 +1018,7 @@ By comparison, if we had used "\-\-1", the reminder would be triggered on
 the last day of the month, regardless of the \fBOMIT\fR.
 .PP
 If you locally omit weekdays but also have globally-omitted weekdays, then
-the list of ommitted weekdays is the union of the two.  Consider this
+the list of omitted weekdays is the union of the two.  Consider this
 example:
 .PP
 .nf
@@ -1215,11 +1227,25 @@ specifies the duration of an event.  For example, if you have a
 	REM 5 March 2021 AT 1:00pm DURATION 90 MSG Meeting
 .fi
 .PP
-
-Note that \fIduration\fR is specified either in hours and minutes as a
-\fItime\fR, or in minutes as an \fIinteger\fR.  If you specify a
-duration of 00:00 or 0, then \fBRemind\fR behaves exactly as if no
-\fBDURATION\fR at all had been present.
+For long-duration reminders, it is convenient to use expressions
+to simplify writing the DURATION.  For example, if you are away
+from 20 Feb 2023 through 23 Feb 2023 (a total of 4 days) you
+could write:
+.PP
+.nf
+        REM 20 Feb AT 00:00 DURATION [4*24]:00 MSG away
+        REM 20 Feb AT 00:00 DURATION [4*24*60] MSG away
+.fi
+.PP
+Note that \fIduration\fR is specified either as
+\fIhours\fR:\fIminutes\fR or just as \fIminutes\fR specified as an
+\fIinteger\fR.
+.PP
+If you specify a duration of 00:00 or 0, then \fBRemind\fR behaves
+exactly as if no \fBDURATION\fR at all had been present.  Although
+durations specified as \fIhours\fR:\fIminutes\fR look superficially like a
+time-of-day, they are not; the \fIhours\fR component is not limited
+to the range 00-23.

 .PP
 .SH SYNTACTIC SUGAR FOR REM
@@ -1961,9 +1987,23 @@ somewhat comparable to a C character array, but more closely resembles
 the string type in BASIC.
 .TP
 .B TIME
-The \fBTIME\fR data type consists of times of the day.  The \fBTIME\fR
-data type is internally stored as an integer representing the number
-of minutes since midnight.
+The \fBTIME\fR data type is used for two different purposes:  To represent
+a time of day with one-minute precision or to represent a duration
+with one-minute precision.  The context of where a \fBTIME\fR is used
+determines whether it is interpreted as a time of day or a duration.
+.RS
+.PP
+In contexts where a \fBTIME\fR represents a time of day, it may range
+from 00:00 to 23:59 and is stored internally as an integer from 0 to
+1439 representing the number of minutes since midnight.
+.PP
+In contexts where a \fBTIME\fR represents a duration, there is no
+upper limit on the hour component (beyond that imposed by the
+restriction that a duration expressed in minutes must fit into the
+signed integer type of your CPU architecture.)  Internally, a duration
+is stored as an integer number of minutes.
+.RE
+
 .TP
 .B DATE
 The \fBDATE\fR data type consists of dates (later than 1 January 1990.)
@@ -2006,6 +2046,15 @@ range from 1 to 12.  Either a period or colon can be used to separate
 the minutes from the hours.  However, Remind will consistently output
 times in 24-hour format using only one separator character.  (The
 output separator character is chosen at compile-time.)
+.PP
+If the \fBTIME\fR is used where \fBRemind\fR expects a time-of-day
+(for example, in an \fBAT\fR clause), then it can be written in
+24-hour format (ranging from 00:00 to 23:59) or 12-hour format
+(ranging from 12:00am to 11:59pm).  If the \fBTIME\fR is used where
+\fBRemind\fR expects a duration, it must not have an \fIam\fR or
+\fIpm\fR suffix and the hour can be as large as you want, so long
+as the total number of minutes in the duration fits in a signed integer
+variable.
 .RE
 .TP
 .B DATE constants
@@ -2939,6 +2988,11 @@ If \fIarg\fR is an \fBINT\fR, then returns the date of Easter Sunday
 for the specified year.  If \fIarg\fR is a \fBDATE\fR or
 \fBDATETIME\fR, then returns the date of the next Easter Sunday on or
 after \fIarg\fR.  (The time component of a datetime is ignored.)
+.RS
+.P
+Note that \fBeasterdate\fR computes the Western Easter.  For the Orthodox
+Easter date, see \fBorthodoxeaster\fR.
+.RE
 .TP
 .B evaltrig(s_trigger [,dq_start])
 Evaluates \fItrigger\fR as if it were a REM or IFTRIG trigger specification
@@ -3032,6 +3086,16 @@ Support for Hebrew dates - see the section "THE HEBREW CALENDAR"
 .B hour(tq_time)
 Returns the hour component of \fItime\fR.
 .TP
+.B htmlescape(s_str)
+Returns a modified copy of \fIstr\fR where "<" is replaced with
+"&lt;"; ">" is replaced with "&gt;" and "&" is replaced with "&amp;"
+.TP
+.B htmlstriptags(s_str)
+Returns a modified copy of \fIstr\fR where HTML tags are stripped
+out.  The stripping algorithm is fairly naive; the function starts
+stripping characters when it encounters a "<" and it stops stripping
+when it encounters a ">".
+.TP
 .B iif(si_test1, x_arg1, [si_test2, x_arg2,...], x_default)
 If \fItest1\fR is not zero or the null string, returns \fIarg1\fR.
 Otherwise, if \fItest2\fR is not zero or the null string, returns
@@ -3261,6 +3325,17 @@ the actual time, or a time supplied on the command line.
 Returns a string that is the ordinal number \fInum\fR.  For example,
 \fBord(2)\fR returns "2nd", and \fBord(213)\fR returns "213th".
 .TP
+.B orthodoxeaster(dqi_arg)
+If \fIarg\fR is an \fBINT\fR, then returns the date of Orthodox Easter Sunday
+for the specified year.  If \fIarg\fR is a \fBDATE\fR or
+\fBDATETIME\fR, then returns the date of the next Orthodox Easter Sunday on or
+after \fIarg\fR.  (The time component of a datetime is ignored.)
+.RS
+.P
+Note that \fBorthodoxeaster\fR computes the Orthodox Easter.  For the Western
+Easter date, see \fBeasterdate\fR.
+.RE
+.TP
 .B ostype()
 Returns "UNIX".  Remind used to run on OS/2 and MS-DOS, but does not
 any longer.
@@ -4012,15 +4087,30 @@ You cannot use expression-pasting to determine the type (\fBMSG\fR,
 \fBCAL\fR, etc.) of a \fBREM\fR command.  You can paste expressions
 before and after the \fBMSG\fR, etc. keywords, but cannot do something like
 this:
+.RS
 .PP
 .nf
-		REM ["12 Nov 1993 AT 13:05 " + "MSG" + " BOO!"]
+        REM ["12 Nov 1993 AT 13:05 " + "MSG" + " BOO!"]
 .fi
 .PP
-.B COMMON PITFALLS IN EXPRESSION PASTING
+However, as an escape hatch, the sequence \fBSPECIAL\fR \fItype\fR
+means the same thing as just \fItype\fR where \fItype\fR is one
+of MSG, MSF, RUN, CAL, PS and PSFILE.  This lets you do something
+like this:
 .PP
-Remember, when pasting in expressions, that extra spaces are not
-inserted.  Thus, something like:
+.nf
+        SET type "MSG"
+        REM 12 Nov 2024 SPECIAL [type] Hello
+.fi
+.PP
+You can use this to control the types of your reminders based on variables
+you set, how Remind is invoked, etc.
+.RE
+.PP
+.B COMMON PITFALLS WITH EXPRESSION PASTING
+.PP
+Remember that extra spaces are not inserted when an expression is
+pasted.  Thus, something like:
 .PP
 .nf
 	REM[expr]MSG[expr]
--- a/man/tkremind.1.in
+++ b/man/tkremind.1.in
@@ -3,7 +3,7 @@
 .SH NAME
 tkremind \- graphical front-end to Remind calendar program
 .SH SYNOPSIS
-.B tkremind \fR[\fIoptions\fR] [\fIread_file\fR] [\fIwrite_file\fR] [\fIconfig_file\fR]
+.B tkremind \fR[\fIoptions\fR] [\fIread_file\fR [\fIwrite_file\fR [\fIconfig_file\fR]]]
 .SH DESCRIPTION
 \fBTkRemind\fR is a graphical front-end to the \fBRemind\fR program.
 It provides a friendly graphical interface which allows you to view
--- a/rem2html/rem2html
+++ b/rem2html/rem2html
@@ -687,7 +687,7 @@ if ($Options{help}) {
    exit(0);
 }

-if (-t STDIN) {
+if (-t STDIN) { ## no critic
    print STDERR "$TIDY_PROGNAME: Input should not come from a terminal.\n\n";
    usage(1);
 }
--- a/rem2pdf/bin/rem2pdf.in
+++ b/rem2pdf/bin/rem2pdf.in
@@ -37,7 +37,7 @@ my $settings = {
        numbers_on_left => 0,
        small_calendars => 0,
        fill_entire_page => 0,
-
+        wrap_calendar => 0,
        media => 'Letter',
        width => 0,
        height => 0,
@@ -86,6 +86,7 @@ Options:
 --media=MEDIA, -mMEDIA  Size for specified media
 --width=W, -wW          Specify media width in 1/72nds of an inch
 --height=H, -hH         Specify media height in 1/72nds of an inch
+--wrap, -y              Make calendar fit in at most 5 rows
 --title-font=FONT       Specify font for calendar title
 --header-font=FONT      Specify font for weekday names
 --daynum-font=FONT      Specify font for day numbers
@@ -114,6 +115,7 @@ my $ret = GetOptions('landscape|l' =>        \$settings->{landscape},
                     'fill-page|e' =>        \$settings->{fill_entire_page},
                     'media|m=s' =>          \$settings->{media},
                     'width|w=i' =>          \$settings->{width},
+                     'wrap|y'    =>          \$settings->{wrap_calendar},
                     'height|h=i' =>         \$settings->{height},
                     'title-font=s' =>       \$settings->{title_font},
                     'header-font=s' =>      \$settings->{header_font},
@@ -175,7 +177,7 @@ if ($settings->{landscape}) {
 }

 # Don't read from a terminal
-if (-t STDIN) {
+if (-t STDIN) { ## no critic
        print STDERR "I can't read data from a terminal.  Please run like this:\n";
        print STDERR "  remind -pp [options] filename | $me [options] > out.pdf\n";
        exit(1);
@@ -249,20 +251,21 @@ sub set_media
 sub set_media_from_file
 {
        my ($fn) = @_;
-        if (!open(IN, '<', $fn)) {
+        my $IN;
+        if (!open($IN, '<', $fn)) {
                return 0;
        }
-        while(<IN>) {
+        while(<$IN>) {
                chomp;
                s/^\s+//;
                s/\s+$//;
                next if ($_ eq '');
                next if ($_ =~ /^#/);
                my $m = $_;
-                close(IN);
+                close($IN);
                return set_media($m);
        }
-        close(IN);
+        close($IN);
        return 0;
 }

@@ -430,6 +433,14 @@ The default is 36.
 The size of the margin at the right of the page in 1/72ths of an inch.
 The default is 36.

+=item --wrap, -y
+
+Modify the calendar so that if it would normally require 6 rows to print,
+then the last day (or last two days, as needed) are moved to the
+first row of the calendar, and adjust the small calendar positions
+as needed.  This results in a calendar that only requires 5 rows, but
+with the last day or two appearing in the I<first> row.
+
 =item --verbose, -v

 Print (on STDERR) the name of the month and year for each month that
--- a/rem2pdf/lib/Remind/PDF.pm
+++ b/rem2pdf/lib/Remind/PDF.pm
@@ -110,7 +110,6 @@ sub read_one_month
        $self->{daysinnextmonth} = 0;
        $self->{prevmonthyear} = 0;
        $self->{nextmonthyear} = 0;
-
        for (my $i=0; $i<=31; $i++) {
                $self->{entries}->[$i] = [];
        }
@@ -134,7 +133,7 @@ sub read_one_month
        $line = $in->getline();
        chomp($line);
        if ($line =~ /^\S+ \S+ \S+ \S+ \S+ \S+ \S+$/) {
-                @{$self->{daynames}} = map { s/_/ /g; $_; } (split(/ /, $line));
+                @{$self->{daynames}} = map { s/_/ /g; $_; } (split(/ /, $line)); ## no critic
        } else {
                return (undef, "Cannot interpret line: $line");
        }
@@ -213,7 +212,7 @@ hash keys found in the newer "remind -pp" JSON output.
 sub parse_oldstyle_line
 {
        my ($self, $line) = @_;
-        return undef unless $line =~ m|^(\d+)/(\d+)/(\d+) (\S+) (\S+) (\S+) (\S+) (.*)$|;
+        return unless $line =~ m|^(\d+)/(\d+)/(\d+) (\S+) (\S+) (\S+) (\S+) (.*)$|;

        my $hash = {
                date => "$1-$2-$3",
@@ -244,6 +243,143 @@ sub parse_oldstyle_line
        return $hash;
 }

+=head2 setup_daymap
+
+Set up the array that maps ($row, $col) to day number (or -1
+for rows/cols out of range.)
+
+=cut
+sub setup_daymap
+{
+        my ($self, $settings) = @_;
+        # First column
+        my $first_col = $self->{firstwkday};
+        if ($self->{mondayfirst}) {
+                $first_col--;
+                if ($first_col < 0) {
+                        $first_col = 6;
+                }
+        }
+
+        # Last column
+        my $last_col = ($first_col + $self->{daysinmonth} - 1) % 7;
+
+        # Number of rows
+        my $rows = 1;
+        my $last_day_on_row = 7 - $first_col;
+        while ($last_day_on_row < $self->{daysinmonth}) {
+                $last_day_on_row += 7;
+                $rows++;
+        }
+
+        # Add a row for small calendars if necessary
+        if (($settings->{small_calendars} != 0) && ($first_col == 0) && ($last_col == 6)) {
+                $rows++;
+                $self->{extra_row} = 1;
+        } else {
+                $self->{extra_row} = 0;
+        }
+        $self->{rows} = $rows;
+        $self->{daymap} = [];
+        $self->{first_col} = $first_col;
+        $self->{last_col} = $last_col;
+        for (my $row=0; $row<$rows; $row++) {
+                for (my $col=0; $col < 7; $col++) {
+                        $self->{daymap}->[$row]->[$col] = -1;
+                }
+        }
+        $self->{nextcal_row} = -1;
+        $self->{prevcal_row} = -1;
+        $self->{nextcal_col} = 6;
+        $self->{prevcal_col} = 0;
+        # Figure out where to draw the small calendars
+        my $extra_row = $self->{extra_row};
+        if ($settings->{small_calendars} == 1) {
+                if ($last_col <= 4 || ($last_col == 6 && $extra_row)) {
+                        $self->{prevcal_row} = $rows-1;
+                        $self->{prevcal_col} = 5;
+                        $self->{nextcal_row} = $rows-1;
+                        $self->{nextcal_col} = 6;
+                } else {
+                        $self->{prevcal_row} = 0;
+                        $self->{prevcal_col} = 0;
+                        $self->{nextcal_row} = 0;
+                        $self->{nextcal_col} = 1;
+                }
+        } elsif ($settings->{small_calendars} == 2) {
+                if ($first_col >= 2) {
+                        $self->{prevcal_row} = 0;
+                        $self->{prevcal_col} = 0;
+                        $self->{nextcal_row} = 0;
+                        $self->{nextcal_col} = 1;
+                } else {
+                        $self->{prevcal_row} = $rows-1;
+                        $self->{prevcal_col} = 5;
+                        $self->{nextcal_row} = $rows-1;
+                        $self->{nextcal_col} = 6;
+                }
+        } elsif ($settings->{small_calendars} == 3) {
+                if ($first_col >= 1 && $last_col <= 5) {
+                        $self->{prevcal_row} = 0;
+                        $self->{prevcal_col} = 0;
+                        $self->{nextcal_row} = $rows-1;
+                        $self->{nextcal_col} = 6;
+                } else {
+                        if ($last_col <= 4 || ($last_col == 6 && $extra_row)) {
+                                $self->{prevcal_row} = $rows-1;
+                                $self->{prevcal_col} = 5;
+                                $self->{nextcal_row} = $rows-1;
+                                $self->{nextcal_col} = 6;
+                        } else {
+                                $self->{prevcal_row} = 0;
+                                $self->{prevcal_col} = 0;
+                                $self->{nextcal_row} = 0;
+                                $self->{nextcal_col} = 1;
+                        }
+                }
+        }
+
+        my $col = $first_col;
+        my $row = 0;
+        my $day = 1;
+        while ($day <= $self->{daysinmonth}) {
+                $self->{daymap}->[$row]->[$col] = $day;
+                $day++;
+                $col++;
+                if ($col > 6) {
+                        $row++;
+                        $col = 0;
+                }
+        }
+
+        # Check if we should wrap the calendar
+        if ($self->{rows} == 6 && $settings->{wrap_calendar}) {
+                # Move everything in the last row to the first row
+                my $occupied_col = 0;
+                for (my $col=0; $col<7; $col++) {
+                        if ($self->{daymap}->[5]->[$col] > 0) {
+                                $self->{daymap}->[0]->[$col] = $self->{daymap}->[5]->[$col];
+                                $occupied_col = $col;
+                        } else {
+                                last;
+                        }
+                }
+                if ($settings->{small_calendars}) {
+                        $self->{prevcal_row} = 0;
+                        $self->{prevcal_col} = $occupied_col+1;
+                        $self->{nextcal_row} = 0;
+                        $self->{nextcal_col} = $occupied_col+2;
+                        for (my $col = 6; $col > 0; $col--) {
+                                if ($self->{daymap}->[0]->[$col] < 0) {
+                                        $self->{nextcal_col} = $col;
+                                        last;
+                                }
+                        }
+                }
+                $self->{rows} = 5;
+        }
+}
+
 =head2 read_one_month_pp($in, $specials_accepted)

 This function reads one month's worth of data from the file handle
@@ -329,6 +465,7 @@ sub render
 {
        my ($self, $cr, $settings) = @_;

+        $self->setup_daymap($settings);
        $self->{horiz_lines} = [];
        $cr->set_line_cap('square');
        my $so_far = $self->draw_title($cr, $settings);
@@ -347,111 +484,25 @@ sub render
        $self->{remaining_space} = $settings->{height} - $settings->{margin_bottom} - $so_far;

        $self->{minimum_row_height} = $self->{remaining_space} / 9;
-        # First column
-        my $first_col = $self->{firstwkday};
-        if ($self->{mondayfirst}) {
-                $first_col--;
-                if ($first_col < 0) {
-                        $first_col = 6;
-                }
-        }
-
-        # Last column
-        my $last_col = ($first_col + $self->{daysinmonth} - 1) % 7;
-
-        # Number of rows
-        my $rows = 1;
-        my $last_day_on_row = 7 - $first_col;
-        while ($last_day_on_row < $self->{daysinmonth}) {
-                $last_day_on_row += 7;
-                $rows++;
-        }
-
-        my $extra_row = 0;
-        # Add a row for small calendars if necessary
-        if (($settings->{small_calendars} != 0) && ($first_col == 0) && ($last_col == 6)) {
-                $rows++;
-                $extra_row++;
-        }
-
-        # Figure out where to draw the small calendars
-        my $prevcal_top = 0;
-        my $nextcal_top = 0;
-        my $prevcal_bottom = 0;
-        my $nextcal_bottom = 0;
-
-        if ($settings->{small_calendars} == 1) {
-                if ($last_col <= 4 || ($last_col == 6 && $extra_row)) {
-                        $prevcal_bottom = 1;
-                        $nextcal_bottom = 1;
-                } else {
-                        $prevcal_top = 1;
-                        $nextcal_top = 1;
-                }
-        } elsif ($settings->{small_calendars} == 2) {
-                if ($first_col >= 2) {
-                        $prevcal_top = 1;
-                        $nextcal_top = 1;
-                } else {
-                        $prevcal_bottom = 1;
-                        $nextcal_bottom = 1;
-                }
-        } elsif ($settings->{small_calendars} == 3) {
-                if ($first_col >= 1 && $last_col <= 5) {
-                        $prevcal_top = 1;
-                        $nextcal_bottom = 1;
-                } else {
-                        if ($last_col <= 4 || ($last_col == 6 && $extra_row)) {
-                                $prevcal_bottom = 1;
-                                $nextcal_bottom = 1;
-                        } else {
-                                $prevcal_top = 1;
-                                $nextcal_top = 1;
-                        }
-                }
-        }

        # Row height if we are filling the page
-        $self->{row_height} = $self->{remaining_space} / $rows;
+        $self->{row_height} = $self->{remaining_space} / $self->{rows};

-        my ($start_col, $start_day);
-        for (my $row = 0; $row < $rows; $row++) {
-                if ($row == 0) {
-                        $start_day = 1;
-                        $start_col = $first_col;
-                } else {
-                        $start_col = 0;
-                }
+        for (my $row = 0; $row < $self->{rows}; $row++) {
                my $old_so_far = $so_far;
-                $so_far = $self->draw_row($cr, $settings, $so_far, $row, $start_day, $start_col);
-                $start_day += 7 - $start_col;
+                $so_far = $self->draw_row($cr, $settings, $so_far, $row);
                push(@{$self->{horiz_lines}}, $so_far);
-                if ($row == 0) {
-                        if ($prevcal_top) {
-                                my ($x1, $y1, $x2, $y2) = $self->col_box_coordinates($old_so_far, 0, $so_far - $old_so_far, $settings);
-                                $self->draw_small_calendar($cr, $x1 + $settings->{border_size}, $y1 + $settings->{border_size},
-                                                           $x2 - $x1 - 2*$settings->{border_size}, $y2 - $y1 - 2*$settings->{border_size},
-                                                           $settings, $self->{prevmonthname}, $self->{daysinprevmonth}, ($first_col + 35 - $self->{daysinprevmonth}) % 7);
-                        }
-                        if ($nextcal_top) {
-                                my ($x1, $y1, $x2, $y2) = $self->col_box_coordinates($old_so_far, 1, $so_far - $old_so_far, $settings);
-                                $self->draw_small_calendar($cr, $x1 + $settings->{border_size}, $y1 + $settings->{border_size},
-                                                           $x2 - $x1 - 2*$settings->{border_size}, $y2 - $y1 - 2*$settings->{border_size},
-                                                           $settings, $self->{nextmonthname}, $self->{daysinnextmonth}, ($last_col + 1) % 7);
-                        }
-                } elsif ($row == $rows-1) {
-                        if ($prevcal_bottom) {
-                                my ($x1, $y1, $x2, $y2) = $self->col_box_coordinates($old_so_far, 5, $so_far - $old_so_far, $settings);
-                                $self->draw_small_calendar($cr, $x1 + $settings->{border_size}, $y1 + $settings->{border_size},
-                                                           $x2 - $x1 - 2*$settings->{border_size}, $y2 - $y1 - 2*$settings->{border_size},
-                                                           $settings, $self->{prevmonthname}, $self->{daysinprevmonth}, ($first_col + 35 - $self->{daysinprevmonth}) % 7);
-                        }
-                        if ($nextcal_bottom) {
-                                my ($x1, $y1, $x2, $y2) = $self->col_box_coordinates($old_so_far, 6, $so_far - $old_so_far, $settings);
-                                $self->draw_small_calendar($cr, $x1 + $settings->{border_size}, $y1 + $settings->{border_size},
-                                                           $x2 - $x1 - 2*$settings->{border_size}, $y2 - $y1 - 2*$settings->{border_size},
-                                                           $settings, $self->{nextmonthname}, $self->{daysinnextmonth}, ($last_col + 1) % 7);
-                        }
+                if ($row == $self->{prevcal_row}) {
+                        my ($x1, $y1, $x2, $y2) = $self->col_box_coordinates($old_so_far, $self->{prevcal_col}, $so_far - $old_so_far, $settings);
+                        $self->draw_small_calendar($cr, $x1 + $settings->{border_size}, $y1 + $settings->{border_size},
+                                                   $x2 - $x1 - 2*$settings->{border_size}, $y2 - $y1 - 2*$settings->{border_size},
+                                                   $settings, $self->{prevmonthname}, $self->{daysinprevmonth}, ($self->{first_col} + 35 - $self->{daysinprevmonth}) % 7);
+                }
+                if ($row == $self->{nextcal_row}) {
+                        my ($x1, $y1, $x2, $y2) = $self->col_box_coordinates($old_so_far, $self->{nextcal_col}, $so_far - $old_so_far, $settings);
+                        $self->draw_small_calendar($cr, $x1 + $settings->{border_size}, $y1 + $settings->{border_size},
+                                                   $x2 - $x1 - 2*$settings->{border_size}, $y2 - $y1 - 2*$settings->{border_size},
+                                                   $settings, $self->{nextmonthname}, $self->{daysinnextmonth}, ($self->{last_col} + 1) % 7);
                }
        }

@@ -495,23 +546,18 @@ calendar row.
 =cut
 sub draw_row
 {
-        my ($self, $cr, $settings, $so_far, $row, $start_day, $start_col) = @_;
+        my ($self, $cr, $settings, $so_far, $row) = @_;

-        my $col = $start_col;
-        my $day = $start_day;
        my $height = 0;

        # Preview them to figure out the row height...
        if (!$settings->{fill_entire_page}) {
-                while ($col < 7) {
+                for (my $col=0; $col<7; $col++) {
+                        my $day = $self->{daymap}->[$row]->[$col];
+                        next if ($day < 1);
                        my $h = $self->draw_day($cr, $settings, $so_far, $day, $col, 0);
                        $height = $h if ($h > $height);
-                        $day++;
-                        $col++;
-                        last if ($day > $self->{daysinmonth});
                }
-                $col = $start_col;
-                $day = $start_day;
        } else {
                $height = $self->{row_height} - $settings->{border_size} * 2;
        }
@@ -520,10 +566,10 @@ sub draw_row
                $height = $self->{minimum_row_height};
        }
        # Now draw for real
-        while ($col < 7 && $day <= $self->{daysinmonth}) {
+        for (my $col=0; $col<7; $col++) {
+                my $day = $self->{daymap}->[$row]->[$col];
+                next if ($day < 1);
                $self->draw_day($cr, $settings, $so_far, $day, $col, $height);
-                $day++;
-                $col++;
        }

        return $so_far + $height + $settings->{border_size};
@@ -908,7 +954,7 @@ sub create_from_stream
        return(undef, 'Unable to parse JSON stream');
 }

-=head2 Remind::PDF::Multi->create_from_stream($json, $specials_accepted)
+=head2 Remind::PDF::Multi->create_from_json($json, $specials_accepted)

 This method takes data from a JSON string <$json>.  C<$specials_accepted>
 is a hashref of SPECIAL reminder types to accept; the key is the name of the
--- a/scripts/tkremind
+++ b/scripts/tkremind
@@ -240,6 +240,9 @@ set Option(PrintOrient) landscape
 set OptDescr(PrintFill) "(0/1) If 1, fill entire page when printing"
 set Option(PrintFill) 1

+set OptDescr(WrapCal) "(0/1) If 1, make printed calendars occupy at most 5 rows"
+set Option(WrapCal) 0
+
 set OptDescr(PrintDaysRight) "(0/1) If 1, put day numbers in the top-right of each calendar box"
 set Option(PrintDaysRight) 1

@@ -1290,6 +1293,7 @@ proc DoPrint {} {
    radiobutton .p.portrait -text "Portrait" -variable Option(PrintOrient) -value portrait

    checkbutton .p.fill -text "Fill page" -variable Option(PrintFill)
+    checkbutton .p.wrap -text "Use at most 5 rows (PDF only)" -variable Option(WrapCal)
    checkbutton .p.right -text "Day numbers at top-right" -variable Option(PrintDaysRight)
    checkbutton .p.encoding -text "ISO 8859-1 PostScript encoding" -variable Option(PrintEncoding)
    checkbutton .p.calendars -text "Print small calendars" -variable Option(PrintSmallCalendars)
@@ -1300,12 +1304,14 @@ proc DoPrint {} {
    if {$HaveRem2PDF} {
        pack .p.f1 .p.ff .p.f2 .p.f2a .p.f3 .p.f3a \
            -side top -fill both -expand 1 -anchor w
+        pack .p.fill .p.wrap .p.right .p.encoding .p.calendars -in .p.f3a \
+	    -side top -anchor w -fill none -expand 0
    } else {
        pack .p.f1 .p.f2 .p.f2a .p.f3 .p.f3a \
            -side top -fill both -expand 1 -anchor w
-    }
-    pack .p.fill .p.right .p.encoding .p.calendars -in .p.f3a \
+        pack .p.fill .p.right .p.encoding .p.calendars -in .p.f3a \
 	    -side top -anchor w -fill none -expand 0
+    }
    pack .p.f4 -side top -fill both -expand 1 -anchor w
    pack .p.f11 .p.f12 -in .p.f1 -side top -fill none -expand 0 -anchor w
    pack .p.tofile .p.filename .p.browse -in .p.f11 -side left -fill none -expand 0 -anchor w
@@ -1398,6 +1404,11 @@ proc DoPrint {} {
        }
    }

+    if {$Option(WrapCal)} {
+        if {$Option(PrintFormat) == "pdf"} {
+            append cmd " --wrap"
+        }
+    }
    if {$Option(PrintOrient) == "landscape"} {
 	append cmd " -l"
    }
@@ -3326,7 +3337,9 @@ proc EditableEnter { w } {
        set c [$w tag cget $ctag -foreground]
    }
    if {"$c" != ""} {
-        $w tag configure $tag -underline 1 -underlinefg $c
+        $w tag configure $tag -underline 1
+        # underlinefg not supported on older versions of Tk
+        eval { $w tag configure $tag -underlinefg $c }
    } else {
        $w tag configure $tag -underline 1
    }
@@ -3633,7 +3646,9 @@ proc DoShadeSpecial { n r g b } {
 #***********************************************************************
 proc DoMoonSpecial { n stuff fntag day } {
    set msg ""
-    set num [scan $stuff "%d %d %d %s" phase junk1 junk2 msg]
+    # Yes, this is gross, but the odds of ctrl-A appearing
+    # in the text associated with a MOON are small.
+    set num [scan $stuff {%d %d %d %[^]} phase junk1 junk2 msg]
    if {$num < 1} {
 	return
    }
--- a/src/Makefile.in
+++ b/src/Makefile.in
@@ -71,6 +71,9 @@ install-stripped: install
 clean:
 	rm -f *.o *~ core *.bak $(PROGS)

+cppcheck:
+	cppcheck --force --enable=all --suppress=variableScope --suppress=ConfigurationNotChecked *.c
+
 clobber:
 	rm -f *.o *~ remind rem2ps test.out core *.bak

--- a/src/calendar.c
+++ b/src/calendar.c
@@ -497,7 +497,7 @@ get_month_abbrev(char const *mon)
    return buf;
 #else
    char *s;
-    wchar_t tmp_buf[128];
+    wchar_t tmp_buf[128] = {0};
    wchar_t *ws;
    int i;
    int len;
@@ -621,7 +621,6 @@ Colorize256(int r, int g, int b, int bg, int clamp)
 	    best = (int) i;
 	}
    }
-    cur = &XTerm256Colors[best];
    if (bg) {
        sprintf(buf, "\x1B[48;5;%dm", best);
    } else {
@@ -1812,8 +1811,12 @@ static int DoCalRem(ParsePtr p, int col)
 	FindToken(DBufValue(&buf), &tok);
 	DBufFree(&buf);
 	if (tok.type == T_Empty || tok.type == T_Comment) {
+            r = OK;
+            if (trig.addomit) {
+                r = AddGlobalOmit(LastTriggerDate);
+            }
 	    FreeTrig(&trig);
-	    return OK;
+	    return r;
 	}
 	if (tok.type != T_RemType || tok.val == SAT_TYPE) {
 	    FreeTrig(&trig);
@@ -1831,6 +1834,10 @@ static int DoCalRem(ParsePtr p, int col)
 	    DBufFree(&buf);
 	}
 	trig.typ = tok.val;
+
+        /* Convert some SPECIALs back to plain types */
+        FixSpecialType(&trig);
+
        if (trig.typ == MSG_TYPE ||
            trig.typ == CAL_TYPE ||
            trig.typ == MSF_TYPE) {
--- a/src/config.h.in
+++ b/src/config.h.in
@@ -7,9 +7,6 @@
 /* Define if your <sys/time.h> declares struct tm.  */
 #undef TM_IN_SYS_TIME

-/* Define if you have the <sys/file.h> header file.  */
-#undef HAVE_SYS_FILE_H
-
 /* Define if you have the <sys/types.h> header file.  */
 #undef HAVE_SYS_TYPES_H

--- a/src/dorem.c
+++ b/src/dorem.c
@@ -123,8 +123,12 @@ int DoRem(ParsePtr p)
 	    }
 	    StrnCpy(trig.passthru, DBufValue(&buf), PASSTHRU_LEN);
 	    DBufFree(&buf);
-	}
-	trig.typ = tok.val;
+        }
+        trig.typ = tok.val;
+
+        /* Convert some SPECIALs back to plain types */
+        FixSpecialType(&trig);
+
 	dse = LastTriggerDate;
 	if (!LastTrigValid || PurgeMode) {
 	    FreeTrig(&trig);
@@ -188,7 +192,7 @@ int DoRem(ParsePtr p)

    r = OK;
    if (ShouldTriggerReminder(&trig, &tim, dse, &err)) {
-	if ( (r=TriggerReminder(p, &trig, &tim, dse)) ) {
+	if ( (r=TriggerReminder(p, &trig, &tim, dse, 0)) ) {
 	    FreeTrig(&trig);
 	    return r;
 	}
@@ -370,6 +374,7 @@ int ParseRem(ParsePtr s, Trigger *trig, TimeTrig *tim, int save_in_globals)
 		}
 		StrnCpy(trig->passthru, DBufValue(&buf), PASSTHRU_LEN);
 	    }
+            FixSpecialType(trig);
            parsing = 0;
            break;

@@ -893,7 +898,7 @@ static int ParseScanFrom(ParsePtr s, Trigger *t, int type)
 /*  Trigger the reminder if it's a RUN or MSG type.            */
 /*                                                             */
 /***************************************************************/
-int TriggerReminder(ParsePtr p, Trigger *t, TimeTrig *tim, int dse)
+int TriggerReminder(ParsePtr p, Trigger *t, TimeTrig *tim, int dse, int is_queued)
 {
    int r, y, m, d;
    char PrioExpr[VAR_NAME_LEN+25];
@@ -901,8 +906,21 @@ int TriggerReminder(ParsePtr p, Trigger *t, TimeTrig *tim, int dse)
    DynamicBuffer buf, calRow;
    DynamicBuffer pre_buf;
    char const *s;
+    char const *msg_command = NULL;
    Value v;

+    if (MsgCommand) {
+        msg_command = MsgCommand;
+    }
+    if (is_queued && QueuedMsgCommand) {
+        msg_command = QueuedMsgCommand;
+    }
+
+    /* A null command is no command */
+    if (msg_command && !*msg_command) {
+        msg_command = NULL;
+    }
+
    int red = -1, green = -1, blue = -1;
    int is_color = 0;

@@ -947,7 +965,7 @@ int TriggerReminder(ParsePtr p, Trigger *t, TimeTrig *tim, int dse)
    }
 /* If it's a MSG-type reminder, and no -k option was used, issue the banner. */
    if ((t->typ == MSG_TYPE || t->typ == MSF_TYPE) 
-	&& !DidMsgReminder && !NextMode && !MsgCommand) {
+	&& !DidMsgReminder && !NextMode && !msg_command) {
        DidMsgReminder = 1;
 	if (!DoSubstFromString(DBufValue(&Banner), &buf,
 			       DSEToday, NO_TIME) &&
@@ -1091,7 +1109,7 @@ int TriggerReminder(ParsePtr p, Trigger *t, TimeTrig *tim, int dse)
 	DBufPuts(&buf, Decolorize());
    }

-    if ((!MsgCommand && t->typ == MSG_TYPE) || t->typ == MSF_TYPE) {
+    if ((!msg_command && t->typ == MSG_TYPE) || t->typ == MSF_TYPE) {
 	if (DBufPutc(&buf, '\n') != OK) {
 	    DBufFree(&buf);
 	    return E_NO_MEM;
@@ -1113,8 +1131,8 @@ int TriggerReminder(ParsePtr p, Trigger *t, TimeTrig *tim, int dse)
    switch(t->typ) {
    case MSG_TYPE:
    case PASSTHRU_TYPE:
-	if (MsgCommand) {
-	    DoMsgCommand(MsgCommand, DBufValue(&buf));
+	if (msg_command) {
+	    DoMsgCommand(msg_command, DBufValue(&buf));
 	} else {
 	    printf("%s", DBufValue(&buf));
 	}
@@ -1466,3 +1484,25 @@ static int ShouldTriggerBasedOnWarn(Trigger *t, int dse, int *err)
 	}
    }
 }
+
+void FixSpecialType(Trigger *t)
+{
+    if (t->typ != PASSTHRU_TYPE) {
+        return;
+    }
+
+    /* Convert SPECIAL MSG / MSF / RUN / CAL to just plain MSG / MSF / etc */
+    if (!StrCmpi(t->passthru, "MSG")) {
+        t->typ = MSG_TYPE;
+    } else if (!StrCmpi(t->passthru, "MSF")) {
+        t->typ = MSF_TYPE;
+    } else if (!StrCmpi(t->passthru, "RUN")) {
+        t->typ = RUN_TYPE;
+    } else if (!StrCmpi(t->passthru, "CAL")) {
+        t->typ = CAL_TYPE;
+    } else if (!StrCmpi(t->passthru, "PS")) {
+        t->typ = PS_TYPE;
+    } else if (!StrCmpi(t->passthru, "PSFILE")) {
+        t->typ = PSF_TYPE;
+    }
+}
--- a/src/dosubst.c
+++ b/src/dosubst.c
@@ -196,7 +196,7 @@ int DoSubst(ParsePtr p, DynamicBuffer *dbuf, Trigger *t, TimeTrig *tt, int dse,
                mode != CAL_MODE &&
                mode != ADVANCE_MODE &&
 		t->typ != RUN_TYPE &&
-                !MsgCommand) {
+                !(MsgCommand && *MsgCommand)) {
 		if (DBufPutc(dbuf, '\n') != OK) return E_NO_MEM;
 	    }
 	    break;
@@ -363,464 +363,464 @@ int DoSubst(ParsePtr p, DynamicBuffer *dbuf, Trigger *t, TimeTrig *tt, int dse,
                    Eprint("%s", ErrMsg[r]);
                }
            }
+            switch(UPPER(c)) {
+            case 'A':
+#ifdef L_A_OVER
+                L_A_OVER
+#else
+                    if (altmode == '*' || !strcmp(DynamicOn, "")) {
+                        snprintf(s, sizeof(s), "%s, %d %s, %d", get_day_name(dse%7), d,
+                                 get_month_name(m), y);
+                    } else {
+                        snprintf(s, sizeof(s), "%s %s, %d %s, %d", DynamicOn, get_day_name(dse%7), d,
+                                 get_month_name(m), y);
+                    }
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'B':
+#ifdef L_B_OVER
+                L_B_OVER
+#else
+                    snprintf(s, sizeof(s), L_INXDAYS, diff);
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'C':
+#ifdef L_C_OVER
+                L_C_OVER
+#else
+                    if (altmode == '*' || !strcmp(DynamicOn, "")) {
+                        snprintf(s, sizeof(s), "%s", get_day_name(dse%7));
+                    } else {
+                        snprintf(s, sizeof(s), "%s %s", DynamicOn, get_day_name(dse%7));
+                    }
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'D':
+#ifdef L_D_OVER
+                L_D_OVER
+#else
+                    snprintf(s, sizeof(s), "%d", d);
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'E':
+#ifdef L_E_OVER
+                L_E_OVER
+#else
+                    if (altmode == '*' || !strcmp(DynamicOn, "")) {
+                        snprintf(s, sizeof(s), "%02d%c%02d%c%04d", d, DateSep,
+                                 m+1, DateSep, y);
+                    } else {
+                        snprintf(s, sizeof(s), "%s %02d%c%02d%c%04d", DynamicOn, d, DateSep,
+                                 m+1, DateSep, y);
+                    }
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'F':
+#ifdef L_F_OVER
+                L_F_OVER
+#else
+                    if (altmode == '*' || !strcmp(DynamicOn, "")) {
+                        snprintf(s, sizeof(s), "%02d%c%02d%c%04d", m+1, DateSep, d, DateSep, y);
+                    } else {
+                        snprintf(s, sizeof(s), "%s %02d%c%02d%c%04d", DynamicOn, m+1, DateSep, d, DateSep, y);
+                    }
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'G':
+#ifdef L_G_OVER
+                L_G_OVER
+#else
+                    if (altmode == '*' || !strcmp(DynamicOn, "")) {
+                        snprintf(s, sizeof(s), "%s, %d %s", get_day_name(dse%7), d, get_month_name(m));
+                    } else {
+                        snprintf(s, sizeof(s), "%s %s, %d %s", DynamicOn, get_day_name(dse%7), d, get_month_name(m));
+                    }
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'H':
+#ifdef L_H_OVER
+                L_H_OVER
+#else
+                    if (altmode == '*' || !strcmp(DynamicOn, "")) {
+                        snprintf(s, sizeof(s), "%02d%c%02d", d, DateSep, m+1);
+                    } else {
+                        snprintf(s, sizeof(s), "%s %02d%c%02d", DynamicOn, d, DateSep, m+1);
+                    }
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'I':
+#ifdef L_I_OVER
+                L_I_OVER
+#else
+                    if (altmode == '*' || !strcmp(DynamicOn, "")) {
+                        snprintf(s, sizeof(s), "%02d%c%02d", m+1, DateSep, d);
+                    } else {
+                        snprintf(s, sizeof(s), "%s %02d%c%02d", DynamicOn, m+1, DateSep, d);
+                    }
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'J':
+#ifdef L_J_OVER
+                L_J_OVER
+#else
+                    if (altmode == '*' || !strcmp(DynamicOn, "")) {
+                        snprintf(s, sizeof(s), "%s, %s %d%s, %d", get_day_name(dse%7),
+                                 get_month_name(m), d, plu, y);
+                    } else {
+                        snprintf(s, sizeof(s), "%s %s, %s %d%s, %d", DynamicOn, get_day_name(dse%7),
+                                 get_month_name(m), d, plu, y);
+                    }
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'K':
+#ifdef L_K_OVER
+                L_K_OVER
+#else
+                    if (altmode == '*' || !strcmp(DynamicOn, "")) {
+                        snprintf(s, sizeof(s), "%s, %s %d%s", get_day_name(dse%7),
+                                 get_month_name(m), d, plu);
+                    } else {
+                        snprintf(s, sizeof(s), "%s %s, %s %d%s", DynamicOn, get_day_name(dse%7),
+                                 get_month_name(m), d, plu);
+                    }
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'L':
+#ifdef L_L_OVER
+                L_L_OVER
+#else
+                    if (altmode == '*' || !strcmp(DynamicOn, "")) {
+                        snprintf(s, sizeof(s), "%04d%c%02d%c%02d", y, DateSep, m+1, DateSep, d);
+                    } else {
+                        snprintf(s, sizeof(s), "%s %04d%c%02d%c%02d", DynamicOn, y, DateSep, m+1, DateSep, d);
+                    }
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'M':
+#ifdef L_M_OVER
+                L_M_OVER
+#else
+                    snprintf(s, sizeof(s), "%s", get_month_name(m));
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'N':
+#ifdef L_N_OVER
+                L_N_OVER
+#else
+                    snprintf(s, sizeof(s), "%d", m+1);
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'O':
+#ifdef L_O_OVER
+                L_O_OVER
+#else
+                    if (RealToday == DSEToday) snprintf(s, sizeof(s), " (%s)", DynamicToday);
+                    else *s = 0;
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'P':
+#ifdef L_P_OVER
+                L_P_OVER
+#else
+                    snprintf(s, sizeof(s), "%s", (diff == 1 ? "" : L_PLURAL));
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'Q':
+#ifdef L_Q_OVER
+                L_Q_OVER
+#else
+                    snprintf(s, sizeof(s), "%s", (diff == 1 ? "'s" : "s'"));
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'R':
+#ifdef L_R_OVER
+                L_R_OVER
+#else
+                    snprintf(s, sizeof(s), "%02d", d);
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'S':
+#ifdef L_S_OVER
+                L_S_OVER
+#else
+                    snprintf(s, sizeof(s), "%s", plu);
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'T':
+#ifdef L_T_OVER
+                L_T_OVER
+#else
+                    snprintf(s, sizeof(s), "%02d", m+1);
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'U':
+#ifdef L_U_OVER
+                L_U_OVER
+#else
+                    if (altmode == '*' || !strcmp(DynamicOn, "")) {
+                        snprintf(s, sizeof(s), "%s, %d%s %s, %d", get_day_name(dse%7), d,
+                                 plu, get_month_name(m), y);
+                    } else {
+                        snprintf(s, sizeof(s), "%s %s, %d%s %s, %d", DynamicOn, get_day_name(dse%7), d,
+                                 plu, get_month_name(m), y);
+                    }
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'V':
+#ifdef L_V_OVER
+                L_V_OVER
+#else
+                    if (altmode == '*' || !strcmp(DynamicOn, "")) {
+                        snprintf(s, sizeof(s), "%s, %d%s %s", get_day_name(dse%7), d, plu,
+                                 get_month_name(m));
+                    } else {
+                        snprintf(s, sizeof(s), "%s %s, %d%s %s", DynamicOn, get_day_name(dse%7), d, plu,
+                                 get_month_name(m));
+                    }
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'W':
+#ifdef L_W_OVER
+                L_W_OVER
+#else
+                    snprintf(s, sizeof(s), "%s", get_day_name(dse%7));
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'X':
+#ifdef L_X_OVER
+                L_X_OVER
+#else
+                    snprintf(s, sizeof(s), "%d", diff);
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'Y':
+#ifdef L_Y_OVER
+                L_Y_OVER
+#else
+                    snprintf(s, sizeof(s), "%d", y);
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case 'Z':
+#ifdef L_Z_OVER
+                L_Z_OVER
+#else
+                    snprintf(s, sizeof(s), "%d", y % 100);
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case '1':
+#ifdef L_1_OVER
+                L_1_OVER
+#else
+                    if (tdiff == 0)
+                        snprintf(s, sizeof(s), "%s", DynamicNow);
+                    else if (hdiff == 0)
+                        snprintf(s, sizeof(s), "%d %s%s %s", mdiff, DynamicMinute, mplu, when);
+                    else if (mdiff == 0)
+                        snprintf(s, sizeof(s), "%d %s%s %s", hdiff, DynamicHour, hplu, when);
+                    else
+                        snprintf(s, sizeof(s), "%d %s%s %s %d %s%s %s", hdiff, DynamicHour, hplu,
+                                 DynamicAnd, mdiff, DynamicMinute, mplu, when);
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case '2':
+#ifdef L_2_OVER
+                L_2_OVER
+#else
+                    if (altmode == '*') {
+                        snprintf(s, sizeof(s), "%d%c%02d%s", hh, TimeSep, min, pm);
+                    } else {
+                        snprintf(s, sizeof(s), "%s %d%c%02d%s", DynamicAt, hh, TimeSep, min, pm);
+                    }
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case '3':
+#ifdef L_3_OVER
+                L_3_OVER
+#else
+
+                    if (altmode == '*') {
+                        snprintf(s, sizeof(s), "%02d%c%02d", h, TimeSep, min);
+                    } else {
+                        snprintf(s, sizeof(s), "%s %02d%c%02d", DynamicAt, h, TimeSep, min);
+                    }
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case '4':
+#ifdef L_4_OVER
+                L_4_OVER
+#else
+                    snprintf(s, sizeof(s), "%d", tdiff);
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case '5':
+#ifdef L_5_OVER
+                L_5_OVER
+#else
+                    snprintf(s, sizeof(s), "%d", adiff);
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case '6':
+#ifdef L_6_OVER
+                L_6_OVER
+#else
+                    snprintf(s, sizeof(s), "%s", when);
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case '7':
+#ifdef L_7_OVER
+                L_7_OVER
+#else
+                    snprintf(s, sizeof(s), "%d", hdiff);
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case '8':
+#ifdef L_8_OVER
+                L_8_OVER
+#else
+                    snprintf(s, sizeof(s), "%d", mdiff);
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case '9':
+#ifdef L_9_OVER
+                L_9_OVER
+#else
+                    snprintf(s, sizeof(s), "%s", mplu);
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case '0':
+#ifdef L_0_OVER
+                L_0_OVER
+#else
+                    snprintf(s, sizeof(s), "%s", hplu);
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case '!':
+#ifdef L_BANG_OVER
+                L_BANG_OVER
+#else
+                    snprintf(s, sizeof(s), "%s", (tdiff >= 0 ? DynamicIs : DynamicWas));
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case '@':
+#ifdef L_AT_OVER
+                L_AT_OVER
+#else
+                    snprintf(s, sizeof(s), "%d%c%02d%s", chh, TimeSep, cmin, cpm);
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case '#':
+#ifdef L_HASH_OVER
+                L_HASH_OVER
+#else
+                    snprintf(s, sizeof(s), "%02d%c%02d", ch, TimeSep, cmin);
+#endif
+                SHIP_OUT(s);
+                break;
+
+            case '_':
+                if (PsCal == PSCAL_LEVEL2 || PsCal == PSCAL_LEVEL3 || (mode != CAL_MODE && mode != ADVANCE_MODE && !(MsgCommand && *MsgCommand))) {
+                    snprintf(s, sizeof(s), "%s", NL);
+                } else {
+                    snprintf(s, sizeof(s), " ");
+                }
+                SHIP_OUT(s);
+                break;
+
+            case QUOTE_MARKER:
+                /* Swallow any QUOTE_MARKERs which may somehow creep in... */
+                break;
+
+            case '"':
+                if (DontSuppressQuoteMarkers) {
+                    if (DBufPutc(dbuf, '%') != OK) return E_NO_MEM;
+                    if (DBufPutc(dbuf, c) != OK) return E_NO_MEM;
+                } else {
+                    if (DBufPutc(dbuf, QUOTE_MARKER) != OK) return E_NO_MEM;
+                    has_quote = 1;
+                }
+                break;
+
+            default:
+                if (DBufPutc(dbuf, c) != OK) return E_NO_MEM;
+            }
        }

-	if (!done) switch(UPPER(c)) {
-	case 'A':
-#ifdef L_A_OVER
-	    L_A_OVER
-#else
-            if (altmode == '*' || !strcmp(DynamicOn, "")) {
-		snprintf(s, sizeof(s), "%s, %d %s, %d", get_day_name(dse%7), d,
-			get_month_name(m), y);
-	    } else {
-		snprintf(s, sizeof(s), "%s %s, %d %s, %d", DynamicOn, get_day_name(dse%7), d,
-			get_month_name(m), y);
-	    }
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'B':
-#ifdef L_B_OVER
-	    L_B_OVER
-#else
-	    snprintf(s, sizeof(s), L_INXDAYS, diff);
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'C':
-#ifdef L_C_OVER
-	    L_C_OVER
-#else
-            if (altmode == '*' || !strcmp(DynamicOn, "")) {
-		snprintf(s, sizeof(s), "%s", get_day_name(dse%7));
-	    } else {
-		snprintf(s, sizeof(s), "%s %s", DynamicOn, get_day_name(dse%7));
-	    }
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'D':
-#ifdef L_D_OVER
-	    L_D_OVER
-#else
-	    snprintf(s, sizeof(s), "%d", d);
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'E':
-#ifdef L_E_OVER
-	    L_E_OVER
-#else
-            if (altmode == '*' || !strcmp(DynamicOn, "")) {
-		snprintf(s, sizeof(s), "%02d%c%02d%c%04d", d, DateSep,
-			m+1, DateSep, y);
-	    } else {
-		snprintf(s, sizeof(s), "%s %02d%c%02d%c%04d", DynamicOn, d, DateSep,
-			m+1, DateSep, y);
-	    }
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'F':
-#ifdef L_F_OVER
-	    L_F_OVER
-#else
-            if (altmode == '*' || !strcmp(DynamicOn, "")) {
-		snprintf(s, sizeof(s), "%02d%c%02d%c%04d", m+1, DateSep, d, DateSep, y);
-	    } else {
-		snprintf(s, sizeof(s), "%s %02d%c%02d%c%04d", DynamicOn, m+1, DateSep, d, DateSep, y);
-	    }
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'G':
-#ifdef L_G_OVER
-	    L_G_OVER
-#else
-            if (altmode == '*' || !strcmp(DynamicOn, "")) {
-		snprintf(s, sizeof(s), "%s, %d %s", get_day_name(dse%7), d, get_month_name(m));
-	    } else {
-		snprintf(s, sizeof(s), "%s %s, %d %s", DynamicOn, get_day_name(dse%7), d, get_month_name(m));
-	    }
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'H':
-#ifdef L_H_OVER
-	    L_H_OVER
-#else
-            if (altmode == '*' || !strcmp(DynamicOn, "")) {
-		snprintf(s, sizeof(s), "%02d%c%02d", d, DateSep, m+1);
-	    } else {
-		snprintf(s, sizeof(s), "%s %02d%c%02d", DynamicOn, d, DateSep, m+1);
-	    }
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'I':
-#ifdef L_I_OVER
-	    L_I_OVER
-#else
-            if (altmode == '*' || !strcmp(DynamicOn, "")) {
-		snprintf(s, sizeof(s), "%02d%c%02d", m+1, DateSep, d);
-	    } else {
-		snprintf(s, sizeof(s), "%s %02d%c%02d", DynamicOn, m+1, DateSep, d);
-	    }
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'J':
-#ifdef L_J_OVER
-	    L_J_OVER
-#else
-            if (altmode == '*' || !strcmp(DynamicOn, "")) {
-		snprintf(s, sizeof(s), "%s, %s %d%s, %d", get_day_name(dse%7),
-			get_month_name(m), d, plu, y);
-	    } else {
-		snprintf(s, sizeof(s), "%s %s, %s %d%s, %d", DynamicOn, get_day_name(dse%7),
-			get_month_name(m), d, plu, y);
-	    }
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'K':
-#ifdef L_K_OVER
-	    L_K_OVER
-#else
-            if (altmode == '*' || !strcmp(DynamicOn, "")) {
-		snprintf(s, sizeof(s), "%s, %s %d%s", get_day_name(dse%7),
-			get_month_name(m), d, plu);
-	    } else {
-		snprintf(s, sizeof(s), "%s %s, %s %d%s", DynamicOn, get_day_name(dse%7),
-			get_month_name(m), d, plu);
-	    }
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'L':
-#ifdef L_L_OVER
-	    L_L_OVER
-#else
-            if (altmode == '*' || !strcmp(DynamicOn, "")) {
-		snprintf(s, sizeof(s), "%04d%c%02d%c%02d", y, DateSep, m+1, DateSep, d);
-	    } else {
-		snprintf(s, sizeof(s), "%s %04d%c%02d%c%02d", DynamicOn, y, DateSep, m+1, DateSep, d);
-	    }
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'M':
-#ifdef L_M_OVER
-	    L_M_OVER
-#else
-	    snprintf(s, sizeof(s), "%s", get_month_name(m));
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'N':
-#ifdef L_N_OVER
-	    L_N_OVER
-#else
-	    snprintf(s, sizeof(s), "%d", m+1);
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'O':
-#ifdef L_O_OVER
-	    L_O_OVER
-#else
-            if (RealToday == DSEToday) snprintf(s, sizeof(s), " (%s)", DynamicToday);
-	    else *s = 0;
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'P':
-#ifdef L_P_OVER
-	    L_P_OVER
-#else
-	    snprintf(s, sizeof(s), "%s", (diff == 1 ? "" : L_PLURAL));
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'Q':
-#ifdef L_Q_OVER
-	    L_Q_OVER
-#else
-	    snprintf(s, sizeof(s), "%s", (diff == 1 ? "'s" : "s'"));
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'R':
-#ifdef L_R_OVER
-	    L_R_OVER
-#else
-	    snprintf(s, sizeof(s), "%02d", d);
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'S':
-#ifdef L_S_OVER
-	    L_S_OVER
-#else
-	    snprintf(s, sizeof(s), "%s", plu);
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'T':
-#ifdef L_T_OVER
-	    L_T_OVER
-#else
-	    snprintf(s, sizeof(s), "%02d", m+1);
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'U':
-#ifdef L_U_OVER
-	    L_U_OVER
-#else
-            if (altmode == '*' || !strcmp(DynamicOn, "")) {
-		snprintf(s, sizeof(s), "%s, %d%s %s, %d", get_day_name(dse%7), d,
-			plu, get_month_name(m), y);
-	    } else {
-		snprintf(s, sizeof(s), "%s %s, %d%s %s, %d", DynamicOn, get_day_name(dse%7), d,
-			plu, get_month_name(m), y);
-	    }
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'V':
-#ifdef L_V_OVER
-	    L_V_OVER
-#else
-            if (altmode == '*' || !strcmp(DynamicOn, "")) {
-		snprintf(s, sizeof(s), "%s, %d%s %s", get_day_name(dse%7), d, plu,
-			get_month_name(m));
-	    } else {
-		snprintf(s, sizeof(s), "%s %s, %d%s %s", DynamicOn, get_day_name(dse%7), d, plu,
-			get_month_name(m));
-	    }
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'W':
-#ifdef L_W_OVER
-	    L_W_OVER
-#else
-	    snprintf(s, sizeof(s), "%s", get_day_name(dse%7));
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'X':
-#ifdef L_X_OVER
-	    L_X_OVER
-#else
-	    snprintf(s, sizeof(s), "%d", diff);
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'Y':
-#ifdef L_Y_OVER
-	    L_Y_OVER
-#else
-	    snprintf(s, sizeof(s), "%d", y);
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case 'Z':
-#ifdef L_Z_OVER
-	    L_Z_OVER
-#else
-	    snprintf(s, sizeof(s), "%d", y % 100);
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case '1':
-#ifdef L_1_OVER
-	    L_1_OVER
-#else
-	    if (tdiff == 0)
-		snprintf(s, sizeof(s), "%s", DynamicNow);
-	    else if (hdiff == 0)
-		snprintf(s, sizeof(s), "%d %s%s %s", mdiff, DynamicMinute, mplu, when);
-	    else if (mdiff == 0)
-		snprintf(s, sizeof(s), "%d %s%s %s", hdiff, DynamicHour, hplu, when);
-	    else
-		snprintf(s, sizeof(s), "%d %s%s %s %d %s%s %s", hdiff, DynamicHour, hplu,
-			DynamicAnd, mdiff, DynamicMinute, mplu, when);
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case '2':
-#ifdef L_2_OVER
-	    L_2_OVER
-#else
-	    if (altmode == '*') {
-		snprintf(s, sizeof(s), "%d%c%02d%s", hh, TimeSep, min, pm);
-	    } else {
-		snprintf(s, sizeof(s), "%s %d%c%02d%s", DynamicAt, hh, TimeSep, min, pm);
-	    }
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case '3':
-#ifdef L_3_OVER
-	    L_3_OVER
-#else
-
-	    if (altmode == '*') {
-		snprintf(s, sizeof(s), "%02d%c%02d", h, TimeSep, min);
-	    } else {
-		snprintf(s, sizeof(s), "%s %02d%c%02d", DynamicAt, h, TimeSep, min);
-	    }
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case '4':
-#ifdef L_4_OVER
-	    L_4_OVER
-#else
-	    snprintf(s, sizeof(s), "%d", tdiff);
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case '5':
-#ifdef L_5_OVER
-	    L_5_OVER
-#else
-	    snprintf(s, sizeof(s), "%d", adiff);
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case '6':
-#ifdef L_6_OVER
-	    L_6_OVER
-#else
-	    snprintf(s, sizeof(s), "%s", when);
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case '7':
-#ifdef L_7_OVER
-	    L_7_OVER
-#else
-	    snprintf(s, sizeof(s), "%d", hdiff);
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case '8':
-#ifdef L_8_OVER
-	    L_8_OVER
-#else
-	    snprintf(s, sizeof(s), "%d", mdiff);
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case '9':
-#ifdef L_9_OVER
-	    L_9_OVER
-#else
-	    snprintf(s, sizeof(s), "%s", mplu);
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case '0':
-#ifdef L_0_OVER
-	    L_0_OVER
-#else
-	    snprintf(s, sizeof(s), "%s", hplu);
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case '!':
-#ifdef L_BANG_OVER
-	    L_BANG_OVER
-#else
-            snprintf(s, sizeof(s), "%s", (tdiff >= 0 ? DynamicIs : DynamicWas));
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case '@':
-#ifdef L_AT_OVER
-	    L_AT_OVER
-#else
-	    snprintf(s, sizeof(s), "%d%c%02d%s", chh, TimeSep, cmin, cpm);
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case '#':
-#ifdef L_HASH_OVER
-	    L_HASH_OVER
-#else
-	    snprintf(s, sizeof(s), "%02d%c%02d", ch, TimeSep, cmin);
-#endif
-	    SHIP_OUT(s);
-	    break;
-
-	case '_':
-	    if (PsCal == PSCAL_LEVEL2 || PsCal == PSCAL_LEVEL3 || (mode != CAL_MODE && mode != ADVANCE_MODE && !MsgCommand)) {
-		snprintf(s, sizeof(s), "%s", NL);
-	    } else {
-		snprintf(s, sizeof(s), " ");
-	    }
-	    SHIP_OUT(s);
-	    break;
-
-	case QUOTE_MARKER:
-	    /* Swallow any QUOTE_MARKERs which may somehow creep in... */
-	    break;
-
-	case '"':
-            if (DontSuppressQuoteMarkers) {
-                if (DBufPutc(dbuf, '%') != OK) return E_NO_MEM;
-                if (DBufPutc(dbuf, c) != OK) return E_NO_MEM;
-            } else {
-                if (DBufPutc(dbuf, QUOTE_MARKER) != OK) return E_NO_MEM;
-                has_quote = 1;
-            }
-	    break;
-
-	default:
-	    if (DBufPutc(dbuf, c) != OK) return E_NO_MEM;
-	}
 	if (isupper(c)) {
 	    os = DBufValue(dbuf);
 	    os += strlen(os) - strlen(s);
--- a/src/expr.c
+++ b/src/expr.c
@@ -376,12 +376,10 @@ int Evaluate(char const **s, Var *locals, ParsePtr p)
 	    DBufFree(&ExprBuf);
 	    r = Evaluate(s, locals, p);  /* Leaves the last parsed token in ExprBuf */
 	    if (r) return r;
-	    r = OK;
-	    if (*DBufValue(&ExprBuf) != ')') {
+            if (*DBufValue(&ExprBuf) != ')') {
 		DBufFree(&ExprBuf);
 		return E_MISS_RIGHT_PAREN;
 	    }
-	    if (r) return r;
 	} else if (*DBufValue(&ExprBuf) == '+') {
 	    continue; /* Ignore unary + */
 	}
--- a/src/funcs.c
+++ b/src/funcs.c
@@ -27,13 +27,9 @@
 #include <ctype.h>
 #include <math.h>
 #include <sys/ioctl.h>
-
+#include <fcntl.h>
 #include <unistd.h>

-#ifdef HAVE_SYS_FILE_H
-#include <sys/file.h>
-#endif
-
 #include <sys/types.h>

 #include <sys/stat.h>
@@ -101,6 +97,8 @@ static int FHebday         (func_info *);
 static int FHebmon         (func_info *);
 static int FHebyear        (func_info *);
 static int FHour           (func_info *);
+static int FHtmlEscape     (func_info *);
+static int FHtmlStriptags  (func_info *);
 static int FIif            (func_info *);
 static int FIndex          (func_info *);
 static int FIsdst          (func_info *);
@@ -124,6 +122,7 @@ static int FNDusk          (func_info *);
 static int FNonomitted     (func_info *);
 static int FNow            (func_info *);
 static int FOrd            (func_info *);
+static int FOrthodoxeaster (func_info *);
 static int FOstype         (func_info *);
 static int FPad            (func_info *);
 static int FPlural         (func_info *);
@@ -264,6 +263,8 @@ BuiltinFunc Func[] = {
    {   "hebmon",       1,      1,      0,          FHebmon },
    {   "hebyear",      1,      1,      0,          FHebyear },
    {   "hour",         1,      1,      1,          FHour   },
+    {   "htmlescape",   1,      1,      1,          FHtmlEscape },
+    {   "htmlstriptags",1,      1,      1,          FHtmlStriptags },
    {   "iif",          1,      NO_MAX, 1,          FIif    },
    {   "index",        2,      3,      1,          FIndex  },
    {   "isany",        1,      NO_MAX, 1,          FIsAny  },
@@ -288,6 +289,7 @@ BuiltinFunc Func[] = {
    {   "nonomitted",   2,      NO_MAX, 0,          FNonomitted },
    {   "now",          0,      0,      0,          FNow    },
    {   "ord",          1,      1,      1,          FOrd    },
+    {   "orthodoxeaster",1,     1,      0,          FOrthodoxeaster },
    {   "ostype",       0,      0,      1,          FOstype },
    {   "pad",          3,      4,      1,          FPad    },
    {   "plural",       1,      3,      1,          FPlural },
@@ -912,9 +914,14 @@ static int FAbs(func_info *info)

    ASSERT_TYPE(0, INT_TYPE);
    v = ARGV(0);
+    if (v == INT_MIN) return E_2HIGH;
+
    RetVal.type = INT_TYPE;
    RETVAL = (v < 0) ? (-v) : v;
    v = RETVAL;
+
+    /* The following test is probably redundant given the test
+       for v == INT_MIN above, but I'll leave it in just in case. */
    if (v < 0) return E_2HIGH;
    return OK;
 }
@@ -955,7 +962,7 @@ static int parse_color_helper(char const *str, int *r, int *g, int *b)
 static int FAnsicolor(func_info *info)
 {
    int r=0, g=0, b=0, bg=0, clamp=1;
-    int status = 0;
+    int status;
    int index = 0;
    bg = 0;
    clamp = 1;
@@ -1160,15 +1167,27 @@ static int FPad(func_info *info)
    if (Nargs < 4 || !ARGV(3)) {
        /* Pad on the LEFT */
        for (i=0; i<wantlen-len; i++) {
-            DBufPutc(&dbuf, *s++);
+            if (DBufPutc(&dbuf, *s++) != OK) {
+                DBufFree(&dbuf);
+                return E_NO_MEM;
+            }
            if (!*s) s = ARGSTR(1);
        }
-        DBufPuts(&dbuf, ARGSTR(0));
+        if (DBufPuts(&dbuf, ARGSTR(0)) != OK) {
+                DBufFree(&dbuf);
+                return E_NO_MEM;
+        }
    } else {
        /* Pad on the RIGHT */
-        DBufPuts(&dbuf, ARGSTR(0));
+        if (DBufPuts(&dbuf, ARGSTR(0)) != OK) {
+            DBufFree(&dbuf);
+            return E_NO_MEM;
+        }
        for (i=0; i<wantlen-len; i++) {
-            DBufPutc(&dbuf, *s++);
+            if (DBufPutc(&dbuf, *s++) != OK) {
+                DBufFree(&dbuf);
+                return E_NO_MEM;
+            }
            if (!*s) s = ARGSTR(1);
        }
    }
@@ -2241,6 +2260,92 @@ static int FHebyear(func_info *info)
    RETVAL = y;
    return OK;
 }
+
+/****************************************************************/
+/*                                                              */
+/* htmlescape - replace <. > and & by &lt; &gt; and &amp;       */
+/*                                                              */
+/****************************************************************/
+static int FHtmlEscape(func_info *info)
+{
+    DynamicBuffer dbuf;
+    char const *s;
+    int r;
+
+    ASSERT_TYPE(0, STR_TYPE);
+
+    DBufInit(&dbuf);
+
+    s = ARGSTR(0);
+    while(*s) {
+        switch(*s) {
+        case '<':
+            r = DBufPuts(&dbuf, "&lt;");
+            break;
+
+        case '>':
+            r = DBufPuts(&dbuf, "&gt;");
+            break;
+
+        case '&':
+            r = DBufPuts(&dbuf, "&amp;");
+            break;
+
+        default:
+            r = DBufPutc(&dbuf, *s);
+            break;
+        }
+        if (r != OK) {
+            DBufFree(&dbuf);
+            return r;
+        }
+        s++;
+    }
+    r = RetStrVal(DBufValue(&dbuf), info);
+    DBufFree(&dbuf);
+    return r;
+}
+
+/****************************************************************/
+/*                                                              */
+/* htmlstriptags - strip out HTML tags from a string            */
+/*                                                              */
+/****************************************************************/
+static int FHtmlStriptags(func_info *info)
+{
+    DynamicBuffer dbuf;
+    char const *s;
+    int r = OK;
+
+    int in_tag = 0;
+    ASSERT_TYPE(0, STR_TYPE);
+
+    DBufInit(&dbuf);
+
+    s = ARGSTR(0);
+    while(*s) {
+        if (!in_tag) {
+            if (*s == '<') {
+                in_tag = 1;
+            } else {
+                r = DBufPutc(&dbuf, *s);
+            }
+        } else {
+            if (*s == '>') {
+                in_tag = 0;
+            }
+        }
+        if (r != OK) {
+            DBufFree(&dbuf);
+            return r;
+        }
+        s++;
+    }
+    r = RetStrVal(DBufValue(&dbuf), info);
+    DBufFree(&dbuf);
+    return r;
+}
+
 /****************************************************************/
 /*                                                              */
 /*  FEasterdate - calc. easter Sunday from a year.              */
@@ -2292,6 +2397,45 @@ static int FEasterdate(func_info *info)

    return OK;
 }
+
+/****************************************************************/
+/*                                                              */
+/*  FOrthodoxeaster - calc. Orthodox easter Sunday              */
+/*                                                              */
+/*  From Meeus, Astronomical Algorithms                         */
+/*                                                              */
+/****************************************************************/
+static int FOrthodoxeaster(func_info *info)
+{
+    int y, m, d;
+    int a, b, c, dd, e, f, dse;
+    if (ARG(0).type == INT_TYPE) {
+	y = ARGV(0);
+	if (y < BASE) return E_2LOW;
+	else if (y > BASE+YR_RANGE) return E_2HIGH;
+    } else if (HASDATE(ARG(0))) {
+	FromDSE(DATEPART(ARG(0)), &y, &m, &d);  /* We just want the year */
+    } else return E_BAD_TYPE;
+
+    do {
+        a = y % 4;
+        b = y % 7;
+        c = y % 19;
+        dd = (19 * c + 15) % 30;
+        e = (2*a + 4*b - dd + 34) % 7;
+        f = dd + e + 114;
+        m = (f / 31) - 1;
+        d = (f % 31) + 1;
+
+        dse = DSE(y, m, d);
+        dse += JulianToGregorianOffset(y, m);
+	RetVal.type = DATE_TYPE;
+	RETVAL = dse;
+	y++;
+    } while (HASDATE(ARG(0)) && RETVAL < DATEPART(ARG(0)));
+
+    return OK;
+}
 /***************************************************************/
 /*                                                             */
 /*  FIsdst and FMinsfromutc                                    */
--- a/src/globals.h
+++ b/src/globals.h
@@ -39,7 +39,7 @@ EXTERN  FILE *ErrFp;
 #define IsLeapYear(y) (((y) % 4) ? 0 : ((!((y) % 100) && ((y) % 400)) ? 0 : 1 ))
 #define DaysInMonth(m, y) ((m) != 1 ? MonthDays[m] : 28 + IsLeapYear(y))

-#define DestroyValue(x) (void) (((x).type == STR_TYPE && (x).v.str) ? (free((x).v.str),(x).type = ERR_TYPE) : 0)
+#define DestroyValue(x) (void) (((x).type == STR_TYPE && (x).v.str) ? (free((x).v.str),(x).v.str = NULL,(x).type = ERR_TYPE) : 0)

 EXTERN	int	DSEToday;
 EXTERN	int	RealToday;
@@ -52,6 +52,7 @@ EXTERN  uid_t   TrustedUsers[MAX_TRUSTED_USERS];

 EXTERN  INIT(   int     NumTrustedUsers, 0);
 EXTERN  INIT(   char    const *MsgCommand, NULL);
+EXTERN  INIT(   char    const *QueuedMsgCommand, NULL);
 EXTERN  INIT(	int     ShowAllErrors, 0);
 EXTERN  INIT(	int     DebugFlag, 0);
 EXTERN  INIT(   int	DoCalendar, 0);
--- a/src/init.c
+++ b/src/init.c
@@ -600,7 +600,12 @@ void InitRemind(int argc, char const *argv[])

 	    case 'k':
 	    case 'K':
-		MsgCommand = arg;
+                if (*arg == ':') {
+                    arg++;
+                    QueuedMsgCommand = arg;
+                } else {
+                    MsgCommand = arg;
+                }
 		while (*arg) arg++;  /* Chew up remaining chars in this arg */
 		break;

--- a/src/json.c
+++ b/src/json.c
@@ -249,7 +249,7 @@ json_value * json_parse_ex (json_settings * settings,
   const json_char * end;
   json_value * top, * root, * alloc = 0;
   json_state state = { 0 };
-   long flags = 0;
+   long flags;
   double num_digits = 0, num_e = 0;
   double num_fraction = 0;

@@ -299,7 +299,7 @@ json_value * json_parse_ex (json_settings * settings,
 	 if (flags & flag_string)
 	 {
 	    if (!b)
-	    {  sprintf (error, "Unexpected EOF in string (at %d:%d)", line_and_col);
+	    {  sprintf (error, "Unexpected EOF in string (at %u:%u)", line_and_col);
 	       goto e_failed;
 	    }

@@ -325,7 +325,7 @@ json_value * json_parse_ex (json_settings * settings,
 			(uc_b3 = hex_value (*++ state.ptr)) == 0xFF ||
 			(uc_b4 = hex_value (*++ state.ptr)) == 0xFF)
 		    {
-			sprintf (error, "Invalid character value `%c` (at %d:%d)", b, line_and_col);
+			sprintf (error, "Invalid character value `%c` (at %u:%u)", b, line_and_col);
 			goto e_failed;
 		    }

@@ -342,7 +342,7 @@ json_value * json_parse_ex (json_settings * settings,
 			    (uc_b3 = hex_value (*++ state.ptr)) == 0xFF ||
 			    (uc_b4 = hex_value (*++ state.ptr)) == 0xFF)
 			{
-			    sprintf (error, "Invalid character value `%c` (at %d:%d)", b, line_and_col);
+			    sprintf (error, "Invalid character value `%c` (at %u:%u)", b, line_and_col);
 			    goto e_failed;
 			}

@@ -472,7 +472,7 @@ json_value * json_parse_ex (json_settings * settings,
 	       if (flags & flag_block_comment)
 	       {
 		  if (!b)
-		  {  sprintf (error, "%d:%d: Unexpected EOF in block comment", line_and_col);
+		  {  sprintf (error, "%u:%u: Unexpected EOF in block comment", line_and_col);
 		     goto e_failed;
 		  }

@@ -488,12 +488,12 @@ json_value * json_parse_ex (json_settings * settings,
 	    else if (b == '/')
 	    {
 	       if (! (flags & (flag_seek_value | flag_done)) && top->type != json_object)
-	       {  sprintf (error, "%d:%d: Comment not allowed here", line_and_col);
+	       {  sprintf (error, "%u:%u: Comment not allowed here", line_and_col);
 		  goto e_failed;
 	       }

 	       if (++ state.ptr == end)
-	       {  sprintf (error, "%d:%d: EOF unexpected", line_and_col);
+	       {  sprintf (error, "%u:%u: EOF unexpected", line_and_col);
 		  goto e_failed;
 	       }

@@ -508,7 +508,7 @@ json_value * json_parse_ex (json_settings * settings,
 		     continue;

 		  default:
-		     sprintf (error, "%d:%d: Unexpected `%c` in comment opening sequence", line_and_col, b);
+		     sprintf (error, "%u:%u: Unexpected `%c` in comment opening sequence", line_and_col, b);
 		     goto e_failed;
 	       };
 	    }
@@ -526,7 +526,7 @@ json_value * json_parse_ex (json_settings * settings,

 	       default:

-		  sprintf (error, "%d:%d: Trailing garbage: `%c`",
+		  sprintf (error, "%u:%u: Trailing garbage: `%c`",
 			   state.cur_line, state.cur_col, b);

 		  goto e_failed;
@@ -545,7 +545,7 @@ json_value * json_parse_ex (json_settings * settings,
 		  if (top && top->type == json_array)
 		     flags = (flags & ~ (flag_need_comma | flag_seek_value)) | flag_next;
 		  else
-		  {  sprintf (error, "%d:%d: Unexpected ]", line_and_col);
+		  {  sprintf (error, "%u:%u: Unexpected ]", line_and_col);
 		     goto e_failed;
 		  }

@@ -561,7 +561,7 @@ json_value * json_parse_ex (json_settings * settings,
 		     }
 		     else
 		     {
-			sprintf (error, "%d:%d: Expected , before %c",
+			sprintf (error, "%u:%u: Expected , before %c",
 				 state.cur_line, state.cur_col, b);

 			goto e_failed;
@@ -576,7 +576,7 @@ json_value * json_parse_ex (json_settings * settings,
 		     }
 		     else
 		     {
-			sprintf (error, "%d:%d: Expected : before %c",
+			sprintf (error, "%u:%u: Expected : before %c",
 				 state.cur_line, state.cur_col, b);

 			goto e_failed;
@@ -702,7 +702,7 @@ json_value * json_parse_ex (json_settings * settings,
 			   continue;
 			}
 			else
-			{  sprintf (error, "%d:%d: Unexpected %c when seeking value", line_and_col, b);
+			{  sprintf (error, "%u:%u: Unexpected %c when seeking value", line_and_col, b);
 			   goto e_failed;
 			}
 		  };
@@ -722,7 +722,7 @@ json_value * json_parse_ex (json_settings * settings,
 		  case '"':

 		     if (flags & flag_need_comma)
-		     {  sprintf (error, "%d:%d: Expected , before \"", line_and_col);
+		     {  sprintf (error, "%u:%u: Expected , before \"", line_and_col);
 			goto e_failed;
 		     }

@@ -747,7 +747,7 @@ json_value * json_parse_ex (json_settings * settings,
 		     }
 		     /* FALLTHROUGH */
 		  default:
-		     sprintf (error, "%d:%d: Unexpected `%c` in object", line_and_col, b);
+		     sprintf (error, "%u:%u: Unexpected `%c` in object", line_and_col, b);
 		     goto e_failed;
 	       };

@@ -765,7 +765,7 @@ json_value * json_parse_ex (json_settings * settings,
 		     if (! (flags & flag_num_e))
 		     {
 			if (flags & flag_num_zero)
-			{  sprintf (error, "%d:%d: Unexpected `0` before `%c`", line_and_col, b);
+			{  sprintf (error, "%u:%u: Unexpected `0` before `%c`", line_and_col, b);
 			   goto e_failed;
 			}

@@ -814,7 +814,7 @@ json_value * json_parse_ex (json_settings * settings,
 	       else if (b == '.' && top->type == json_integer)
 	       {
 		  if (!num_digits)
-		  {  sprintf (error, "%d:%d: Expected digit before `.`", line_and_col);
+		  {  sprintf (error, "%u:%u: Expected digit before `.`", line_and_col);
 		     goto e_failed;
 		  }

@@ -831,7 +831,7 @@ json_value * json_parse_ex (json_settings * settings,
 		  if (top->type == json_double)
 		  {
 		     if (!num_digits)
-		     {  sprintf (error, "%d:%d: Expected digit after `.`", line_and_col);
+		     {  sprintf (error, "%u:%u: Expected digit after `.`", line_and_col);
 			goto e_failed;
 		     }

@@ -857,11 +857,11 @@ json_value * json_parse_ex (json_settings * settings,
 	       else
 	       {
 		  if (!num_digits)
-		  {  sprintf (error, "%d:%d: Expected digit after `e`", line_and_col);
+		  {  sprintf (error, "%u:%u: Expected digit after `e`", line_and_col);
 		     goto e_failed;
 		  }

-		  top->u.dbl *= pow (10.0, (flags & flag_num_e_negative ? - num_e : num_e));
+		  top->u.dbl *= pow (10.0, ((flags & flag_num_e_negative) ? - num_e : num_e));
 	       }

 	       if (flags & flag_num_negative)
@@ -942,7 +942,7 @@ json_value * json_parse_ex (json_settings * settings,

 e_unknown_value:

-   sprintf (error, "%d:%d: Unknown value", line_and_col);
+   sprintf (error, "%u:%u: Unknown value", line_and_col);
   goto e_failed;

 e_alloc_failure:
@@ -952,7 +952,7 @@ e_alloc_failure:

 e_overflow:

-   sprintf (error, "%d:%d: Too long (caught overflow)", line_and_col);
+   sprintf (error, "%u:%u: Too long (caught overflow)", line_and_col);
   goto e_failed;

 e_failed:
--- a/src/main.c
+++ b/src/main.c
@@ -385,6 +385,23 @@ void FromDSE(int dse, int *y, int *m, int *d)
    return;
 }

+int JulianToGregorianOffset(int y, int m)
+{
+    int offset = 13;
+    int centuries;
+    int four_centuries;
+    if (y >= 2100) {
+        centuries = (y - 2000) / 100;
+        four_centuries = (y - 2000) / 400;
+        offset += centuries - four_centuries;
+        if (!(y%100) && (y % 400)) {
+            if (m < 2) {
+                offset--;  /* Offset increments in March */
+            }
+        }
+    }
+    return offset;
+}
 /***************************************************************/
 /*                                                             */
 /*  ParseChar                                                  */
@@ -1634,7 +1651,7 @@ System(char const *cmd)
    int r;
    r = system(cmd);
    if (r == 0) {
-	r = 1;
+        return;
    }
 }

--- a/src/moon.c
+++ b/src/moon.c
@@ -403,7 +403,7 @@ static double phase(double pdate,

    double Day, N, M, Ec, Lambdasun, ml, MM, Ev, Ae, A3, MmP,
 	mEc, A4, lP, V, lPP,
-	MoonAge, MoonPhase,
+	MoonAge, Phase,
 	MoonDist, MoonDFrac, MoonAng,
 	F, SunDist, SunAng;

@@ -465,7 +465,7 @@ static double phase(double pdate,
    MoonAge = lPP - Lambdasun;

    /* Phase of the Moon */
-    MoonPhase = (1 - cos(torad(MoonAge))) / 2;
+    Phase = (1 - cos(torad(MoonAge))) / 2;

    /* Calculate distance of moon from the centre of the Earth */

@@ -477,7 +477,7 @@ static double phase(double pdate,
    MoonDFrac = MoonDist / msmax;
    MoonAng = mangsiz / MoonDFrac;

-    if(pphase)   *pphase = MoonPhase;
+    if(pphase)   *pphase = Phase;
    if(mage)     *mage = synmonth * (fixangle(MoonAge) / 360.0);
    if(dist)     *dist = MoonDist;
    if(angdia)   *angdia = MoonAng;
--- a/src/omit.c
+++ b/src/omit.c
@@ -377,8 +377,12 @@ int DoOmit(ParsePtr p)
 	    break;

 	default:
-	    Eprint("%s: `%s' (OMIT)", ErrMsg[E_UNKNOWN_TOKEN],
-		   DBufValue(&buf));
+            if (tok.type == T_Until) {
+                Eprint("OMIT: UNTIL not allowed; did you mean THROUGH?");
+            } else {
+                Eprint("%s: `%s' (OMIT)", ErrMsg[E_UNKNOWN_TOKEN],
+                       DBufValue(&buf));
+            }
 	    DBufFree(&buf);
 	    return E_UNKNOWN_TOKEN;
 	}
--- a/src/protos.h
+++ b/src/protos.h
@@ -35,7 +35,7 @@ int DoRem (ParsePtr p);
 int DoFlush (ParsePtr p);
 void DoExit (ParsePtr p);
 int ParseRem (ParsePtr s, Trigger *trig, TimeTrig *tim, int save_in_globals);
-int TriggerReminder (ParsePtr p, Trigger *t, TimeTrig *tim, int dse);
+int TriggerReminder (ParsePtr p, Trigger *t, TimeTrig *tim, int dse, int is_queued);
 int ShouldTriggerReminder (Trigger *t, TimeTrig *tim, int dse, int *err);
 int DoSubst (ParsePtr p, DynamicBuffer *dbuf, Trigger *t, TimeTrig *tt, int dse, int mode);
 int DoSubstFromString (char const *source, DynamicBuffer *dbuf, int dse, int tim);
@@ -58,6 +58,7 @@ void InitRemind (int argc, char const *argv[]);
 void Usage (void);
 int DSE (int year, int month, int day);
 void FromDSE (int dse, int *y, int *m, int *d);
+int JulianToGregorianOffset(int y, int m);
 int ParseChar (ParsePtr p, int *err, int peek);
 int ParseToken (ParsePtr p, DynamicBuffer *dbuf);
 int ParseIdentifier (ParsePtr p, DynamicBuffer *dbuf);
@@ -97,9 +98,7 @@ void FindNumericToken (char const *s, Token *t);
 int ComputeTrigger (int today, Trigger *trig, TimeTrig *tim, int *err, int save_in_globals);
 int ComputeTriggerNoAdjustDuration (int today, Trigger *trig, TimeTrig *tim, int *err, int save_in_globals, int duration_days);
 int AdjustTriggerForDuration(int today, int r, Trigger *trig, TimeTrig *tim, int save_in_globals);
-int ComputeScanStart(int today, Trigger *trig, TimeTrig *tt);
 char *StrnCpy (char *dest, char const *source, int n);
-int StrMatch (char const *s1, char const *s2, int n);
 int StrinCmp (char const *s1, char const *s2, int n);
 char *StrDup (char const *s);
 int StrCmpi (char const *s1, char const *s2);
@@ -176,9 +175,9 @@ char const *get_month_name(int mon);

 int push_call(char const *filename, char const *func, int lineno);
 void clear_callstack(void);
-int have_callstack(void);
 int print_callstack(FILE *fp);
 void pop_call(void);
+void FixSpecialType(Trigger *trig);
 #ifdef REM_USE_WCHAR
 #define _XOPEN_SOURCE 600
 #include <wctype.h>
--- a/src/queue.c
+++ b/src/queue.c
@@ -267,7 +267,7 @@ void HandleQueuedReminders(void)
 	    /* Set up global variables so some functions like trigdate()
 	       and trigtime() work correctly                             */
 	    SaveAllTriggerInfo(&(q->t), &(q->tt), DSEToday, q->tt.ttime, 1);
-	    (void) TriggerReminder(&p, &trig, &q->tt, DSEToday);
+	    (void) TriggerReminder(&p, &trig, &q->tt, DSEToday, 1);
 	    if (Daemon < 0) {
 		printf("NOTE endreminder\n");
 	    }
--- a/src/rem2ps.c
+++ b/src/rem2ps.c
@@ -390,7 +390,7 @@ void DoPsCal(void)
   month */
    DBufInit(&buf);
    DBufGets(&buf, stdin);
-    sscanf(DBufValue(&buf), "%s %s %d %d %d", month, year, &days, &wkday,
+    sscanf(DBufValue(&buf), "%39s %39s %d %d %d", month, year, &days, &wkday,
 	   &MondayFirst);

    /* Replace underscores in month name with spaces */
@@ -422,9 +422,9 @@ void DoPsCal(void)
    }

    DBufGets(&buf, stdin);
-    sscanf(DBufValue(&buf), "%s %d", prevm, &prevdays);
+    sscanf(DBufValue(&buf), "%39s %d", prevm, &prevdays);
    DBufGets(&buf, stdin);
-    sscanf(DBufValue(&buf), "%s %d", nextm, &nextdays);
+    sscanf(DBufValue(&buf), "%39s %d", nextm, &nextdays);

    /* Replace underscores with spaces in names of next/prev month */
    s = prevm;
--- a/src/sort.c
+++ b/src/sort.c
@@ -135,7 +135,7 @@ void IssueSortedReminders(void)
 	next = cur->next;
 	switch(cur->typ) {
 	case MSG_TYPE:
-	    if (MsgCommand) {
+	    if (MsgCommand && *MsgCommand) {
 		DoMsgCommand(MsgCommand, cur->text);
            } else {
 		if (cur->trigdate != olddate) {
@@ -147,6 +147,10 @@ void IssueSortedReminders(void)
 	    break;

 	case MSF_TYPE:
+            if (cur->trigdate != olddate) {
+                IssueSortBanner(cur->trigdate);
+                olddate = cur->trigdate;
+            }
 	    FillParagraph(cur->text);
 	    break;

--- a/src/token.c
+++ b/src/token.c
@@ -258,7 +258,6 @@ void FindNumericToken(char const *s, Token *t)
 	/* If we hit a comma, swallow it.  This allows stuff
 	   like Jan 6, 1998 */
 	if (*s == ',') {
-	    s++;
 	    /* Classify the number we've got */
 	    if (t->val >= BASE && t->val <= BASE+YR_RANGE) t->type = T_Year;
 	    else if (t->val >= 1 && t->val <= 31) t->type = T_Day;
--- a/src/trigger.c
+++ b/src/trigger.c
@@ -622,12 +622,10 @@ int ComputeTriggerNoAdjustDuration(int today, Trigger *trig, TimeTrig *tim,
 		fprintf(ErrFp, "%s(%d): %s\n",
 			FileName, LineNo, ErrMsg[E_EXPIRED]);
 	    }
-	    if (result != -1) {
-		if (save_in_globals) {
-		    LastTriggerDate = result;
-		    LastTrigValid = 1;
-		}
-	    }
+            if (save_in_globals) {
+                LastTriggerDate = result;
+                LastTrigValid = 1;
+            }
 	    return -1;
 	}

@@ -640,12 +638,10 @@ int ComputeTriggerNoAdjustDuration(int today, Trigger *trig, TimeTrig *tim,

 	/* Keep scanning... unless there's no point in doing it.*/
 	if (nextstart <= start) {
-	    if (result != -1) {
-		if (save_in_globals) {
-		    LastTriggerDate = result;
-		    LastTrigValid = 1;
-		}
-	    }
+            if (save_in_globals) {
+                LastTriggerDate = result;
+                LastTrigValid = 1;
+            }
 	    trig->expired = 1;
 	    if (DebugFlag & DB_PRTTRIG) {
 		fprintf(ErrFp, "%s(%d): %s\n",
@@ -662,40 +658,3 @@ int ComputeTriggerNoAdjustDuration(int today, Trigger *trig, TimeTrig *tim,
    return -1;
 }

-/***************************************************************/
-/*                                                             */
-/*  ComputeScanStart                                            */
-/*                                                             */
-/*  Figure out where to start scan from by examining SCANFROM  */
-/*  and DURATION                                               */
-/*                                                             */
-/***************************************************************/
-int
-ComputeScanStart(int today, Trigger *trig, TimeTrig *tt)
-{
-    int minutes, days;
-
-    /* If we don't have a time/duration, just use scanfrom */
-    if (tt->ttime == NO_TIME ||
-	tt->duration == NO_TIME) {
-	if (trig->scanfrom == NO_DATE) {
-	    return today;
-	}
-	return trig->scanfrom;
-    }
-
-    /* Calculate time-based SCANFROM */
-    minutes = tt->ttime + tt->duration - 1;
-
-    /* Figure out how many days to scan backwards from */
-    days = minutes / MINUTES_PER_DAY;
-
-    if (trig->scanfrom != NO_DATE) {
-	if (trig->scanfrom <= today - days) {
-	    return trig->scanfrom;
-	} else {
-	    return today - days;
-	}
-    }
-    return today - days;
-}
--- a/src/userfns.c
+++ b/src/userfns.c
@@ -124,8 +124,13 @@ int DoFset(ParsePtr p)
 	DBufFree(&buf);
 	return E_NO_MEM;
    }
-    func->filename = StrDup(FileName);
+    if (FileName) {
+        func->filename = StrDup(FileName);
+    } else {
+        func->filename = StrDup("[cmdline]");
+    }
    if (!func->filename) {
+        free(func);
        return E_NO_MEM;
    }
    func->lineno = LineNo;
@@ -182,7 +187,7 @@ int DoFset(ParsePtr p)
    /* Allow an optional = sign: FSET f(x) = x*x */
    c = ParseNonSpaceChar(p, &r, 1);
    if (c == '=') {
-	c = ParseNonSpaceChar(p, &r, 0);
+	(void) ParseNonSpaceChar(p, &r, 0);
    }
    /* Copy the text over */
    if (p->isnested) {
--- a/src/utils.c
+++ b/src/utils.c
@@ -41,22 +41,6 @@ char *StrnCpy(char *dest, char const *source, int n)
    return odest;
 }

-/***************************************************************/
-/*                                                             */
-/*  StrMatch                                                   */
-/*                                                             */
-/*  Checks that two strings match (case-insensitive) to at     */
-/*  least the specified number of characters, or the length    */
-/*  of the first string, whichever is greater.                 */
-/*                                                             */
-/***************************************************************/
-int StrMatch(char const *s1, char const *s2, int n)
-{
-    int l;
-    if ((l = strlen(s1)) < n) return 0;
-    return !StrinCmp(s1, s2, l);
-}
-
 /***************************************************************/
 /*                                                             */
 /*  StrinCmp - compare strings, case-insensitive               */
@@ -223,13 +207,6 @@ clear_callstack(void)
    callstack = NULL;
 }

-int
-have_callstack(void)
-{
-    if (callstack) return 1;
-    return 0;
-}
-
 static void
 print_callstack_aux(FILE *fp, cs *entry)
 {
--- a/tests/test-rem
+++ b/tests/test-rem
@@ -27,6 +27,10 @@ if test `id -u` = 0 ; then
    exit 1
 fi

+# Set a known timezone so moon phases show up in predictable places
+TZ=UTC
+export TZ
+
 # If we're already in a utf-8 locale, do
 # nothing; otherwise, set LC_ALL
 OK=0
@@ -418,6 +422,9 @@ chmod 0777 include_dir/ww
 ../src/remind include_dir/ww >> ../tests/test.out 2>&1
 rm -rf include_dir/ww

+# This segfaulted in 04.02.03
+../src/remind -h '-imsgprefix(x)="foo"' /dev/null >> ../tests/test.out 2>&1
+
 # Remove references to SysInclude, which is build-specific
 grep -F -v '$SysInclude' < ../tests/test.out > ../tests/test.out.1 && mv -f ../tests/test.out.1 ../tests/test.out
 cmp -s ../tests/test.out ../tests/test.cmp
@@ -428,7 +435,11 @@ else
   echo "Remind:  Acceptance test FAILED"
   echo ""
   echo "Examine the file test.out to see where it differs from the"
-   echo "reference file test.cmp."
+   echo "reference file test.cmp.  Here are the first 200 lines of"
+   echo "diff -u test.out test.cmp"
+   echo ""
+   diff -u ../tests/test.out ../tests/test.cmp | head -n 200
+   echo ""
   exit 1
 fi

--- a/tests/test.cmp
+++ b/tests/test.cmp
--- a/tests/test.rem
+++ b/tests/test.rem
@@ -383,6 +383,14 @@ msg [a077]%
 set a078 easterdate(today())
 set a079 easterdate(1992)
 set a080 easterdate(1995)
+set a078 orthodoxeaster(today())
+set a079 orthodoxeaster(1992)
+set a080 orthodoxeaster(1995)
+set a080 orthodoxeaster(2023)
+set a080 orthodoxeaster(2024)
+set a080 orthodoxeaster(2025)
+set a080 orthodoxeaster(2026)
+set a080 orthodoxeaster(2027)
 set a081 ""
 OMIT 1991-03-11
 set a082 slide('1991-03-01', 7, "Sat", "Sun")
@@ -858,6 +866,21 @@ FUNSET circle square rectangle
 # Should fail
 SET a square(5)

+# htmlescape
+set a htmlescape("foo")
+REM MSG [a]
+set a htmlescape("<&>")
+REM MSG [a]
+set a htmlescape("@&^#*@&^##$*&@><><@#@#><@#>%%_#$foobarquux")
+REM MSG [a]
+
+# htmlstriptags
+set a htmlstriptags("foobar")
+set a htmlstriptags("This is <b>bold</b>")
+set a htmlstriptags("This is <unclosed whut?")
+set a htmlstriptags("this is > whut <b>foo</b>")
+set a htmlstriptags("<img src=\"foo\">")
+
 # Don't want Remind to queue reminders
 EXIT
Author	SHA1	Message	Date
Dianne Skoll	705adbb82a	Update release notes for 04.02.05.	2023-04-11 08:25:54 -04:00
Dianne Skoll	269f9788b6	Bump version to 04.02.05.	2023-04-11 08:22:10 -04:00
Dianne Skoll	5e1c5ae384	Diagnose common error.	2023-04-10 08:51:25 -04:00
Dianne Skoll	562eb83bde	SIGH Fix ADDOMIT/SATISFY bug. This was fixed for normal mode in commit `dedb9766c9` but was not fixed in calendar mode.	2023-04-09 10:44:34 -04:00
Dianne Skoll	a53db00243	Don't bother checking for sys/file.h because nothing includes it.	2023-03-19 09:47:12 -04:00
Dianne Skoll	11375729db	Remove unnecessary #include.	2023-03-19 09:43:57 -04:00
Dianne Skoll	9fee354e6c	Update release notes.	2023-03-15 18:46:30 -04:00
Dianne Skoll	ec76554d41	Treat a null -k option as no -k option	2023-03-15 09:22:44 -04:00
Dianne Skoll	ddb0817c99	Make an empty -k option the same as no -k option.	2023-03-15 09:17:02 -04:00
Dianne Skoll	3d6ecd1f72	Prep for 04.02.04 release.	2023-03-14 12:03:00 -04:00
Dianne Skoll	e3ec6565e9	Add support for -k: option --- applies command only to queued reminders.	2023-03-13 15:16:24 -04:00
Dianne Skoll	8ed49ead7f	Document that SPECIAL [type] means the same thing as [type] for type in MSG, MSF, RUN, CAL, PS and PSFILE.	2023-03-12 18:51:41 -04:00
Dianne Skoll	49fbca416f	Fix typo	2023-03-08 16:06:33 -05:00
Dianne Skoll	82cd438fff	Use -y as shorthand for --wrap.	2023-03-08 14:27:43 -05:00
Dianne Skoll	946e1bca38	Update help text to include --wrap, -x option.	2023-03-08 14:14:53 -05:00
Dianne Skoll	e40c81b5bf	Add the "--wrap, -x" command-line parameter to rem2pdf This "wraps" calendars that would normally require 6 rows so they only require 5. It does this by putting the last day or two in the first row rather than the last.	2023-03-08 13:39:49 -05:00
Dianne Skoll	f23418480d	Set up explict (row, col) -> Day mapping This will make it easier to eventually implement a calendar-wrapping feature that will avoid ever having to use 6 rows to display the calendar.	2023-03-08 10:42:15 -05:00
Dianne Skoll	bb4df39c50	Add note to defs.rem about US holidays.	2023-03-08 09:25:29 -05:00
Dianne Skoll	5fec775863	Better DST rules.	2023-03-07 18:34:53 -05:00
Dianne Skoll	a85980fec2	Add rules for moving US federal holidays if they fall on a weekend.	2023-03-07 18:31:58 -05:00
Dianne Skoll	f3ea2962e6	Remove unused function definition.	2023-03-07 16:40:53 -05:00
Dianne Skoll	3a5af23ab6	Fix Thanksgiving definition.	2023-03-07 16:37:17 -05:00
Dianne Skoll	f9656edc51	Make "SPECIAL MSG" the same as "MSG" and same for MSF, RUN, PS and PSFILE This lets us use variables to set the type of a REM command: SET t "MSG" REM SPECIAL [t] A message SET t "CAL" REM SPECIAL [t] A calendar message SET t "RUN" REM SPECIAL [t] /bin/some_cmd	2023-03-03 11:53:45 -05:00
Dianne Skoll	5134b47d47	Oops! Fix up broken tests.	2023-03-02 11:42:54 -05:00
Dianne Skoll	d4a183f3bf	Add htmlstriptags function.	2023-03-02 11:40:03 -05:00
Dianne Skoll	87e392de6c	Check for E_NOMEM conditions.	2023-03-02 09:43:56 -05:00
Dianne Skoll	afc1667e64	Implement htmlescape() built-in function.	2023-03-02 09:39:14 -05:00
Dianne Skoll	8d25270c43	Fix syntax of TkRemind command-line per Ian! D. Allen.	2023-03-02 08:39:14 -05:00
Dianne Skoll	929866a770	Use ^A as the split character rather than \	2023-02-27 12:13:19 -05:00
Dianne Skoll	395bad96a7	Don't barf if -underlinefg is not available; don't lose whitespace in MOON message.	2023-02-27 10:40:59 -05:00
Dianne Skoll	cd7be006c9	Set timezone for tests so moon phases show up on predictable days.	2023-02-23 08:32:24 -05:00
Dianne Skoll	f658ba7ee7	Fix typo, pointed out by @jochensp	2023-02-22 16:18:21 -05:00
Dianne Skoll	7416f4c035	Output a diff of test.out and test.cmp if tests fail, but limit to 200 lines.	2023-02-22 16:04:17 -05:00
Dianne Skoll	2860159ff7	Add test for a fixed bug.	2023-02-22 10:02:18 -05:00
Dianne Skoll	64fa71ab09	Avoid segfault if we define a function on the command-line with -i	2023-02-22 09:57:09 -05:00
Dianne Skoll	ffbba7d4d1	Update WHATSNEW for 04.02.03 release.	2023-02-10 12:57:53 -05:00
Dianne Skoll	fdcc2d8acf	Bump version to 04.02.03.	2023-02-09 09:31:28 -05:00
Dianne Skoll	f1aa4d16af	Test for v == INT_MIN on entry to FAbs.	2023-02-09 08:51:20 -05:00
Dianne Skoll	a55c5580f3	Silence Perl::Critic warning.	2023-02-07 13:45:38 -05:00
Dianne Skoll	569e315306	Suppress some Perl::Critic warnings.	2023-02-07 13:45:08 -05:00
Dianne Skoll	acd641845d	Update WHATSNEW	2023-02-07 13:07:54 -05:00
Dianne Skoll	6b7e6f6788	Another cppcheck cleanup.	2023-02-07 11:20:09 -05:00
Dianne Skoll	4248b9c624	Add "cppcheck" Makefile target.	2023-02-07 11:16:29 -05:00
Dianne Skoll	6de98d1357	A few more cppcheck cleanups.	2023-02-07 11:05:16 -05:00
Dianne Skoll	18f21693af	Clean up some warnings from cppcheck static analyzer.	2023-02-07 10:28:02 -05:00
Dianne Skoll	6fa500a860	Issue sort-banner correctly for MSF-type reminders.	2023-02-02 14:45:54 -05:00
Dianne Skoll	941c02582e	More details on TIME type, courtesy of Ian! D. Allen	2023-01-20 12:58:28 -05:00
Dianne Skoll	e56e3924d9	Clarify DURATION.	2023-01-20 12:33:14 -05:00
Dianne Skoll	d1384a8f69	Add #include <fcntl.h> to funcs.c. Reported by Zoltan Puskas; see https://bugs.gentoo.org/889318	2023-01-20 08:15:30 -05:00
Dianne Skoll	0488d689aa	Update tax day in include/holidays/us.rem	2023-01-19 13:15:50 -05:00
Dianne Skoll	988a94e669	Update WHATSNEW.	2023-01-16 09:23:34 -05:00
Dianne Skoll	ac7e93ac1c	Allow REMIND_LANG to override language.	2023-01-15 21:09:54 -05:00
Dianne Skoll	bb7e9ee676	Add Greek holidays and language pack, courtesy of JeiEl <jarlaxl@freemail.gr>	2023-01-15 19:40:39 -05:00
Dianne Skoll	ac949ce7bd	Proper definition for US tax day.	2023-01-14 14:26:38 -05:00
Dianne Skoll	0fa8eed11f	Correct the US Tax Day calculation, courtesy of Tavis Ormandy	2023-01-14 12:38:25 -05:00
Dianne Skoll	df8694a128	Add orthodoxeaster function.	2023-01-09 15:12:18 -05:00
Dianne Skoll	13df3d96e5	Add JulianToGregorianOffset function.	2023-01-09 14:18:10 -05:00