Make Emacs column width configurable.

[profile] / dot / xinitrc

diff --git a/dot/xinitrc b/dot/xinitrc
index a1f6e0698c22071295fdc6c295424eb99beee7be..171024247c9c3397c86e4336bb569585c2ae0ba6 100755 (executable)
--- a/dot/xinitrc
+++ b/dot/xinitrc
@@ -233,7 +233,9 @@ term=$(pick_program terminal pterm Eterm xterm)
 ## e_lineht = height of a character line in pixels
 ## e_vextra = number of additional vertical cruft pixels
 ##     So an N-line Emacs frame takes N*e_lineht + e_vextra pixels
-e_colwd=492 e_colchars=82 e_lineht=13
+e_colsz=$(mdw-conf emacs-width 77) e_charwd=6 e_colextra=30
+e_colwd=$(( e_colsz*e_charwd + e_colextra ))
+e_colchars=$(( e_colsz + 5 )) e_lineht=13
 case "$emacs" in
   emacs21 | emacs) e_hextra=34 e_cextra=-2 e_vextra=52 ;;
   emacs22 | emacs23) e_hextra=8 e_cextra=-6 e_vextra=46 ;;