Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
e814121e
Commit
e814121e
authored
Nov 09, 2010
by
Glenn Morris
Browse files
* lisp/progmodes/meta-mode.el: (meta-indent-line): Simplify.
parent
3406534c
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
6 additions
and
6 deletions
+6
-6
lisp/ChangeLog
lisp/ChangeLog
+1
-0
lisp/progmodes/meta-mode.el
lisp/progmodes/meta-mode.el
+5
-6
No files found.
lisp/ChangeLog
View file @
e814121e
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):
...
...
lisp/progmodes/meta-mode.el
View file @
e814121e
...
...
@@ -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
))))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment