new fonts
diff --git a/man/fonts b/man/fonts
index 238145d..ce45b0d 100755
--- a/man/fonts
+++ b/man/fonts
@@ -3,8 +3,28 @@
 # MAN=mantimes
 # FONTS=''
 MAN=man
+MANFONT=luxi
+switch($MANFONT){
+
+case lucida
 FONTS='.fp 1 R LucidaSans
 .fp 2 I LucidaSansI
 .fp 3 B LucidaSansB
 .fp 5 L LucidaCW
 '
+
+case luxi
+FONTS='.fp 1 R LuxiSans
+.fp 2 I LuxiSans-Oblique
+.fp 3 B LuxiSans-Bold
+.fp 5 L LuxiMono
+'
+
+case dejavu
+FONTS='.fp 1 R DejaVuSans
+.fp 2 I DejaVuSansOblique
+.fp 3 B DejaVuSansBold
+.fp 5 L DejaVuMonoSans
+'
+
+}
diff --git a/tmac/tmac.an b/tmac/tmac.an
index 393f7f1..140c7e2 100644
--- a/tmac/tmac.an
+++ b/tmac/tmac.an
@@ -1,7 +1,8 @@
-.fp 1 R LucidaSans
-.fp 2 I LucidaSansI
-.fp 3 B LucidaSansB
-.fp 5 L LucidaCW
+.fp 1 R LuxiSans
+.fp 2 I LuxiSans-Oblique
+.fp 3 B LuxiSans-Bold
+.fp 4 BI LuxiSans-BoldOblique
+.fp 5 L LuxiMono
 .ds 9 /usr/local/plan9
 .if n .uf 4
 .if n .bd 3
diff --git a/tmac/tmac.s b/tmac/tmac.s
index c14de15..5421456 100644
--- a/tmac/tmac.s
+++ b/tmac/tmac.s
@@ -244,6 +244,24 @@
 .	fp 2 I LucidaSansI
 .	fp 3 B LucidaSansB
 .	fp 5 CW LucidaCW\}
+.if '\\$1'luxisans'\{\
+.	fp 1 R LuxiSans
+.	fp 2 I LuxiSans-Oblique
+.	fp 3 B LuxiSans-Bold
+.	fp 4 BI LuxiSans-BoldOblique
+.	fp 5 CW LuxiMono\}
+.if '\\$1'dejavu'\{\
+.	fp 1 R DejaVuSerif
+.	fp 2 I DejaVuSerifOblique
+.	fp 3 B DejaVuSerifBold
+.	fp 4 BI DejaVuSerifBoldOblique
+.	fp 5 CW DejaVuMonoSans\}
+.if '\\$1'dejavusans'\{\
+.	fp 1 R DejaVuSans
+.	fp 2 I DejaVuSansOblique
+.	fp 3 B DejaVuSansBold
+.	fp 4 BI DejaVuSansBoldOblique
+.	fp 5 CW DejaVuMonoSans\}
 .if '\\$1'syntax'\{\
 .	fp 1 R Syntax
 .	fp 2 I SyntaxI