Add language code substitution cookie

Author: Peter McCluskey

Changelog

@@ -1,5 +1,7 @@
 Version Changes for Hypermail
 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+ Peter McCluskey (Jun 2, 2004)
+  Add language code substitution cookie patch from Shane Wegner.
 
 ============================
 HYPERMAIL VERSION 2.2.0:

src/printfile.c

@@ -32,6 +32,7 @@
 **              %S - Subject META TAG - Not valid on index pages
 **              %A - Author META TAG - Not valid on index pages
 **              %D - Date META TAG - Not valid on index pages
+**              %G - Two character language
 **              \n - newline character
 **              \t - tab character
 **
@@ -126,6 +127,12 @@ int printfile(FILE *fp, char *format, char *label, char *subject,
 		for (cp = getlocaltime(); *cp; cp++)
 		    putc(*cp, fp);
 		continue;
+	    case 'G':		/* %G - Language code */
+		if (set_language) {
+		    for (cp = set_language; *cp; cp++)
+			putc(*cp, fp);
+		}
+		continue;
 	    case 'h':		/* %h - Hypermail Resource Center */
 		for (cp = HMURL; *cp; cp++)
 		    putc(*cp, fp);