X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/blobdiff_plain/7aa10a2952a0d0ee8543f575966f7e4a780c993c..c1b80c54fa4915bb7174dd4333e9ced40dfee770:/IkiWiki/Plugin/edittemplate.pm

diff --git a/IkiWiki/Plugin/edittemplate.pm b/IkiWiki/Plugin/edittemplate.pm
index 6e8c256da..c2a8da29f 100644
--- a/IkiWiki/Plugin/edittemplate.pm
+++ b/IkiWiki/Plugin/edittemplate.pm
@@ -139,13 +139,24 @@ sub filltemplate ($$) {
 
 	$template->param(name => $page);
 
-	eval {
-		require UUID::Tiny;
-		UUID::Tiny->import(':std');
+	if ($template->query(name => 'uuid')) {
 		my $uuid;
-		$uuid = create_uuid_as_string(UUID_V4());
+		if (open(my $fh, "<", "/proc/sys/kernel/random/uuid")) {
+			$uuid = <$fh>;
+			chomp $uuid;
+			close $fh;
+		}
+		else {
+			eval {
+				require UUID::Tiny;
+				$uuid = UUID::Tiny::create_uuid_as_string(UUID::Tiny::UUID_V4());
+			};
+		}
 		$template->param(uuid => $uuid);
-	};
+	}
+
+	my $time = time();
+	$template->param(time => IkiWiki::date_3339($time));
 
 	return $template->output;
 }