Index: apropos.1
===================================================================
RCS file: /usr/vhosts/mdocml.bsd.lv/cvs/mdocml/apropos.1,v
retrieving revision 1.13
diff -u -r1.13 apropos.1
--- apropos.1	12 Dec 2011 02:00:49 -0000	1.13
+++ apropos.1	14 Dec 2011 10:38:06 -0000
@@ -238,6 +238,10 @@
 .El
 .Sh ENVIRONMENT
 .Bl -tag -width Ds
+.It Ev MACHINE
+Case-insensitive architecture.
+Overriden by
+.Fl S .
 .It Ev MANPATH
 Colon-separated paths overriding the default list of paths searched for
 manual databases.
Index: apropos.c
===================================================================
RCS file: /usr/vhosts/mdocml.bsd.lv/cvs/mdocml/apropos.c,v
retrieving revision 1.24
diff -u -r1.24 apropos.c
--- apropos.c	12 Dec 2011 02:00:49 -0000	1.24
+++ apropos.c	14 Dec 2011 10:38:06 -0000
@@ -62,6 +62,7 @@
 	auxpaths = defpaths = NULL;
 	conf_file = NULL;
 	e = NULL;
+	opts.arch = getenv("MACHINE");
 
 	while (-1 != (ch = getopt(argc, argv, "C:M:m:S:s:")))
 		switch (ch) {
Index: whatis.1
===================================================================
RCS file: /usr/vhosts/mdocml.bsd.lv/cvs/mdocml/whatis.1,v
retrieving revision 1.4
diff -u -r1.4 whatis.1
--- whatis.1	12 Dec 2011 02:00:49 -0000	1.4
+++ whatis.1	14 Dec 2011 10:38:06 -0000
@@ -110,6 +110,10 @@
 .Dl $ apropos -- -i 'Nm~[[:<:]]term[[:>:]]'
 .Sh ENVIRONMENT
 .Bl -tag -width Ds
+.It Ev MACHINE
+Case-insensitive architecture.
+Overriden by
+.Fl S .
 .It Ev MANPATH
 Colon-separated paths overriding the default list of paths searched for
 manual databases.