Commit e814121e authored by Glenn Morris's avatar Glenn Morris
Browse files

* lisp/progmodes/meta-mode.el: (meta-indent-line): Simplify.

parent 3406534c
2010-11-09 Glenn Morris <rgm@gnu.org>
 
* progmodes/meta-mode.el: Remove leading `*' from defcustom docs.
(meta-indent-line): Simplify.
 
* vc/emerge.el (emerge-line-number-in-buf):
* textmodes/ispell.el (ispell-region):
......
......@@ -575,12 +575,11 @@ If the list was changed, sort the list and remove duplicates first."
"Indent the line containing point as Metafont or MetaPost source."
(interactive)
(let ((indent (meta-indent-calculate)))
(save-excursion
(if (/= (current-indentation) indent)
(let ((beg (line-beginning-position))
(end (progn (back-to-indentation) (point))))
(delete-region beg end)
(indent-to indent))))
(if (/= (current-indentation) indent)
(save-excursion
(delete-region (line-beginning-position)
(progn (back-to-indentation) (point)))
(indent-to indent)))
(if (< (current-column) indent)
(back-to-indentation))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment