diff --git a/tiny/GNUmakefile b/tiny/GNUmakefile
index 070756a..8464a8d 100644
--- a/tiny/GNUmakefile
+++ b/tiny/GNUmakefile
@@ -16,6 +16,7 @@ install: \
 	$(BINDIR)/isodate \
 	$(BINDIR)/psg \
 	$(BINDIR)/save \
+	$(BINDIR)/savedate \
 
 fnp: fnp.sh
 fnpa: fnpa.sh
diff --git a/tiny/savedate b/tiny/savedate
new file mode 100755
index 0000000..f66c750
--- /dev/null
+++ b/tiny/savedate
@@ -0,0 +1,6 @@
+#!/bin/sh
+now=`date '+%Y-%m-%dT%H:%M:%S'`
+for i in "$@"
+do
+    mv "$i" "$i.$now" && cp -p "$i.$now" "$i"
+done