--- a2ps-4.13/lib/jobs.c.glibcpaper	Sat Jan 15 18:15:07 2000
+++ a2ps-4.13/lib/jobs.c	Tue Feb 20 18:44:48 2001
@@ -138,6 +138,7 @@
   setlocale (LC_MESSAGES, "");
 #endif
   setlocale (LC_CTYPE, "");
+  setlocale (LC_PAPER, "");
 
   bindtextdomain (PACKAGE, LOCALEDIR);
   textdomain (PACKAGE);
--- a2ps-4.13/lib/options.c.glibcpaper	Tue Aug 31 13:42:41 1999
+++ a2ps-4.13/lib/options.c	Tue Feb 20 18:44:48 2001
@@ -54,6 +54,8 @@
 #include "argv.h"
 #include "quotearg.h"
 #include "filalign.h"
+#include <locale.h>
+#include <langinfo.h>
 
 #define MAN_LINES               66	/* no lines for a man */
 extern char *program_name;
@@ -281,7 +283,8 @@
   struct opt_optarg *opt_optarg_head = NULL;
   struct opt_optarg *opt_optarg = NULL;
   int res;
-
+  unsigned int paper_height=0;
+  
   /* Reset optind so that getopt is reinitialized. */
   optind = 0;
 
@@ -545,7 +548,14 @@
 	break;
 
       case 'M':                 		/* select a medium */
-	xstrcpy (job->medium_request, optarg);
+          if(strcasecmp("_glibc",optarg)==0){
+              paper_height = ((union { char *string; unsigned int word; })nl_langinfo(_NL_PAPER_HEIGHT)).word;
+              if(paper_height==279) /* US Letter */
+                  strcpy(optarg,"letter");
+              else /* Everyone else */
+                  strcpy(optarg,"a4");
+          }
+          xstrcpy (job->medium_request, optarg);
 	break;
 
       case 'n':				/* n copies */
--- a2ps-4.13/src/main.c.glibcpaper	Wed Jan 26 19:29:15 2000
+++ a2ps-4.13/src/main.c	Tue Feb 20 18:45:18 2001
@@ -945,6 +945,7 @@
   setlocale (LC_MESSAGES, "");
 #endif
   setlocale (LC_CTYPE, "");
+  setlocale (LC_PAPER, "");
 
   bindtextdomain (PACKAGE, LOCALEDIR);
   textdomain (PACKAGE);