--- a/lisp/prim/about.el	Mon Aug 13 09:18:41 2007 +0200
+++ b/lisp/prim/about.el	Mon Aug 13 09:19:45 2007 +0200
@@ -157,7 +157,7 @@
     (toggle-read-only 0)
 
     (let ((rest (if who-to-load (list who-to-load)
-		  '(steve mrb cthomp wing stig jwz mly vladimir baw piper bw wmperry kyle larsi)))
+		  '(steve mrb cthomp wing stig jwz mly vladimir baw piper bw wmperry kyle larsi jens)))
 	  (got-error nil))
       (while rest
 	(let* ((who (car rest))
@@ -203,31 +203,34 @@
   (about-load-mosaic)
 
   ;; HERE TO PLACE ADDITIONAL MUGSHOTS
+)
 
-  (goto-char (point-max))
-  (insert "\n   ")
+;; This is losing badly to a redisplay glitch, and it doesn't scale up.
+
+;  (goto-char (point-max))
+;  (insert "\n   ")
 
-  (let ((rest '(steve mrb cthomp wing stig linebreak jwz mly vladimir linebreak baw piper bw linebreak wmperry kyle larsi))
-	(got-error nil))
-    (while rest
-      (if (eq (car rest) 'linebreak)
-	  (insert "\n\n  ")
-	(let* ((who (car rest))
-	       (b (get-buffer "About XEmacs"))
-	       (p (symbol-value-in-buffer who b nil)))
-	  (or (glyphp p) (setq p nil))
-	  (and p
-	       (let ((e (make-extent (point) (point))))
-		 (set-extent-begin-glyph e p)
-		 (set-extent-property e 'keymap about-xref-map)
-		 (set-extent-property e 'xref who)))
-	  (insert " ")
-	  (sit-for 0)))
-      (setq rest (cdr rest)))
-    (insert "\n")
-    (goto-char (point-min))
-    (or got-error (message nil)))
-  )
+;  (let ((rest '(steve mrb cthomp wing stig linebreak jwz mly vladimir linebreak baw piper bw linebreak wmperry kyle larsi jens))
+;	(got-error nil))
+;    (while rest
+;      (if (eq (car rest) 'linebreak)
+;	  (insert "\n\n  ")
+;	(let* ((who (car rest))
+;	       (b (get-buffer "About XEmacs"))
+;	       (p (symbol-value-in-buffer who b nil)))
+;	  (or (glyphp p) (setq p nil))
+;	  (and p
+;	       (let ((e (make-extent (point) (point))))
+;		 (set-extent-begin-glyph e p)
+;		 (set-extent-property e 'keymap about-xref-map)
+;		 (set-extent-property e 'xref who)))
+;	  (insert " ")
+;	  (sit-for 0)))
+;      (setq rest (cdr rest)))
+;    (insert "\n")
+;    (goto-char (point-min))
+;    (or got-error (message nil)))
+;  )
 
 (defun about-xemacs-xref ()
   (interactive "@")
@@ -294,6 +297,7 @@
 	  ('mrb "About Martin Buchholz")
 	  ('kyle "About Kyle Jones")
 	  ('larsi "About Lars Magne Ingebrigtsen")
+	  ('jens "About Jens Lautenbacher")
 	  ('others "About Everyone")
 	  ('features "New XEmacs Features")
 	  ('history "XEmacs History")
@@ -776,6 +780,25 @@
 	  (insert " to go back to the previous page.\n")
 	  )
 
+	 ((eq xref 'jens)
+	  (about-face "Jens Lautenbacher" 'bold)
+	  (insert " <jens@lemcbed.lem.uni-karlsruhe.de>
+
+	Jens did the artwork for graphics added to XEmacs 20.1 and 19.15.
+
+	I'm currently working at the University of Karlsruhe, Germany
+	on getting my diploma thesis on Supersymmetry (uuh, that's
+	physics) done.  After that (and all the remaining exams) I'm
+	looking forward to make a living out of my hobbies --
+	computers (and graphics). But because I have no deadline for
+	the exams and XEmacs betas are released at a high rate this
+	may take some time...")
+
+	  (insert "\n\n\tClick ")
+	  (about-xref "here" prev-page "Return to previous page")
+	  (insert " to go back to the previous page.\n")
+	  )
+
 	 ((eq xref 'others)
 	  (insert "Click ")
 	  (about-xref "here" 'about "Return to previous page")
@@ -847,6 +870,15 @@
 	CERN and stuff.
 	See \"http://www.ifi.uio.no/~larsi/\"
 
+	") (about-xref "Jens Lautenbacher" 'jens "Find out more about Jens Lautenbacher") (insert " <jens@lemcbed.lem.uni-karlsruhe.de>
+	I'm currently working at the University of Karlsruhe, Germany
+	on getting my diploma thesis on Supersymmetry (uuh, that's
+	physics) done.  After that (and all the remaining exams) I'm
+	looking forward to make a living out of my hobbies --
+	computers (and graphics). But because I have no deadline for
+	the exams and XEmacs betas are released at a high rate this
+	may take some time...
+
 	Darrell Kindred <Darrell.Kindred@cmu.edu>
 	Unofficial maintainer of the xemacs-beta list of extant bugs
 	and contributor of an extraordinary number of important bug
@@ -995,7 +1027,6 @@
 	  Valdis Kletnieks <Valdis.Kletnieks@vt.edu>
 	  Jens Krinke <krinke@ips.cs.tu-bs.de>
 	  Mats Larsson <Mats.Larsson@uab.ericsson.se>
-	  Jens Lautenbacher <jens@lemcbed.lem.uni-karlsruhe.de>
 	  Simon Leinen <simon@instrumatic.ch>
 	  Carsten Leonhardt <leo@arioch.tng.oche.de>
 	  James LewisMoss <moss@cs.sc.edu>