--- a/.emacs-my	Wed Mar 24 23:55:56 2010 +0200
+++ b/.emacs-my	Sun Mar 28 22:13:05 2010 +0300
@@ -58,7 +58,7 @@
         tx ty
         )
     ;; Next formulas discovered empiric on Windows host with default font.
-    (setq tx (- (/ px fx) 6))
+    (setq tx (- (/ px fx) 7))
     (setq ty (- (/ py fy) 4))
     (setq initial-frame-alist '((top . 0) (left . 0)))
     (add-to-list 'initial-frame-alist (cons 'width tx))