Index: /trunk/Ohana/src/perl/src/normalize
===================================================================
--- /trunk/Ohana/src/perl/src/normalize	(revision 117)
+++ /trunk/Ohana/src/perl/src/normalize	(revision 118)
@@ -1,5 +1,5 @@
 #!/usr/bin/env perl
 
-$revline = "\$Revision: 1.4 $?";
+$revline = "\$Revision: 1.5 $?";
 ($version) = $revline =~ m|\$Revision:\s*(\S*)|;
 
@@ -76,4 +76,15 @@
     }	
     
+    $elsys = `gconfig ELIXIR_VERSION`; chop ($elsys);
+    @time = localtime;
+    $now = sprintf "%04d-%02d-%02dT%02d:%02d:%02d", $time[5]+1900, $time[4]+1, $time[3], $time[2], $time[1], $time[0];
+    $elsys = `gconfig ELIXIR_VERSION`; chop ($elsys);
+    print MANA "keyword a EL_SYS -w    \"$elsys\"\n";
+    print MANA "keyword a EL_SYS -wc   \"Elixir System Version\"\n";
+    print MANA "keyword a EL_NRM -w    \"$version\"\n";
+    print MANA "keyword a EL_NRM -wc   \"Elixir Normalize Version\"\n";
+    print MANA "keyword a REL_DATE -w  \"$now\"\n";
+    print MANA "keyword a REL_DATE -wc \"UTC Release Date\"\n";
+
     print MANA "keyword a COMMENT -ws \"Elixir:normalize $version\"\n";
     print MANA "keyword a COMMENT -ws \"no renormalization needed for $type\"\n";
@@ -190,6 +201,17 @@
 	print MANA "keyword b ELCONF -wc \"Original Elixir config\"\n";
     }	
-    print MANA "keyword b COMMENT -ws \"Elixir:normalize version $version\"\n";
-    print MANA "keyword b COMMENT -ws \"FLAT image normalized wrt CCD $refccd\"\n";
+
+    @time = localtime;
+    $now = sprintf "%04d-%02d-%02dT%02d:%02d:%02d", $time[5]+1900, $time[4]+1, $time[3], $time[2], $time[1], $time[0];
+    $elsys = `gconfig ELIXIR_VERSION`; chop ($elsys);
+    print MANA "keyword b EL_SYS   -w  \"$elsys\"\n";
+    print MANA "keyword b EL_SYS   -wc \"Elixir System Version\"\n";
+    print MANA "keyword b EL_NRM   -w  \"$version\"\n";
+    print MANA "keyword b EL_NRM   -wc \"Elixir Normalize Version\"\n";
+    print MANA "keyword b REL_DATE -w \"$now\"\n";
+    print MANA "keyword b REL_DATE -wc \"UTC Release Date\"\n";
+
+    print MANA "keyword b COMMENT  -ws \"Elixir:normalize version $version\"\n";
+    print MANA "keyword b COMMENT  -ws \"FLAT image normalized wrt CCD $refccd\"\n";
     print MANA "clip b 0.0 0.0 6.4 0.0\n";
     print MANA "wd b $output -bitpix 16 -bzero 3.2 -bscale 0.0001\n";