[Emacs] Add function to easily set 80 chars font size
This commit is contained in:
		@@ -761,6 +761,10 @@ This was taken from [[http://emacs.stackexchange.com/questions/7583/transiently-
 | 
				
			|||||||
(defun imalison:font-size-reset ()
 | 
					(defun imalison:font-size-reset ()
 | 
				
			||||||
  (interactive)
 | 
					  (interactive)
 | 
				
			||||||
  (imalison:set-font-size imalison:default-font-size-pt))
 | 
					  (imalison:set-font-size imalison:default-font-size-pt))
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					(defun imalison:font-size-80chars ()
 | 
				
			||||||
 | 
					  (interactive)
 | 
				
			||||||
 | 
					  (imalison:set-font-size 120))
 | 
				
			||||||
#+END_SRC
 | 
					#+END_SRC
 | 
				
			||||||
** Message Result Builder
 | 
					** Message Result Builder
 | 
				
			||||||
This macro is useful when writing emacs-lisp. It creates a new interactive command that shows you the result of evaluating a function, with optionally provided arguments.
 | 
					This macro is useful when writing emacs-lisp. It creates a new interactive command that shows you the result of evaluating a function, with optionally provided arguments.
 | 
				
			||||||
@@ -1717,7 +1721,8 @@ custom-set-faces in your custom file.
 | 
				
			|||||||
  ("a" imalison:appearance "Set Default Appearance")
 | 
					  ("a" imalison:appearance "Set Default Appearance")
 | 
				
			||||||
  ("f" set-frame-font "Set Frame Font")
 | 
					  ("f" set-frame-font "Set Frame Font")
 | 
				
			||||||
  ("t" helm-themes "Choose Emacs Theme")
 | 
					  ("t" helm-themes "Choose Emacs Theme")
 | 
				
			||||||
  ("0" imalison:font-size-reset "Reset to default size"))
 | 
					  ("0" imalison:font-size-reset "Reset to default size")
 | 
				
			||||||
 | 
					  ("8" imalison:font-size-80chars "80 chars 3 columns font size"))
 | 
				
			||||||
#+END_SRC
 | 
					#+END_SRC
 | 
				
			||||||
*** Copy/Yanking
 | 
					*** Copy/Yanking
 | 
				
			||||||
#+BEGIN_SRC emacs-lisp
 | 
					#+BEGIN_SRC emacs-lisp
 | 
				
			||||||
 
 | 
				
			|||||||
		Reference in New Issue
	
	Block a user