e22 sw hack

gistfile1.diff

diff --git a/switch-window.el b/switch-window.el
index 444ea6f..b223ddd 100644
--- a/switch-window.el
+++ b/switch-window.el
@@ -100,7 +100,9 @@ from-current-window is not nil"
 	;; make it so that the huge number appears centered
 	(dotimes (i lines-before) (insert "\n"))
 	(dotimes (i margin-left)  (insert " "))
-	(insert label)))
+        (if (fboundp 'text-scale-increase)
+                  (insert label)
+                  (insert (propertize label 'face (list :height (* (* h 100) (/ w h)))))))
 
     (set-window-buffer win buf)
     buf))