Code: Select all
(setq tput_cols (exec "tput cols"))
(if tput_cols (pretty-print (- (int (tput_cols 0)) 11)))
;;
;; then try:
(symbols)
Code: Select all
(setq tput_cols (exec "tput cols"))
(if tput_cols (pretty-print (- (int (tput_cols 0)) 11)))
;;
;; then try:
(symbols)