--- a/ndp.lua	Mon Jun 22 01:16:01 2009 +0100
+++ b/ndp.lua	Mon Jun 22 01:21:17 2009 +0100
@@ -127,10 +127,15 @@
 	
 	local patterns = 
 	{ 
+		{ Pi"today" };
 		{ Pi"tomorrow" /
 			function ()
 				time = time + seconds_in_a.day;
 			end };
+		{ (lpeg.one_of{"a ", "the "}+true) * Pi"day after" /
+			function ()
+				time = time + seconds_in_a.day;
+			end };
 		{ Pi"next week" /
 			function ()
 				time = time + seconds_in_a.week;