# HG changeset patch # User Glenn Morris # Date 1164266812 0 # Node ID 2942fb5a1900649d249775a5f46b44faba5d4750 # Parent 07ca11e5f910b779895b511496166d9eee37a3b9 (f90-comment-indent): Do not move point in default case. diff -r 07ca11e5f910 -r 2942fb5a1900 lisp/progmodes/f90.el --- a/lisp/progmodes/f90.el Thu Nov 23 07:26:23 2006 +0000 +++ b/lisp/progmodes/f90.el Thu Nov 23 07:26:52 2006 +0000 @@ -1007,8 +1007,9 @@ (skip-chars-backward " \t") (bolp))) (f90-calculate-indent)) - (t (skip-chars-backward " \t") - (max (if (bolp) 0 (1+ (current-column))) comment-column)))) + (t (save-excursion + (skip-chars-backward " \t") + (max (if (bolp) 0 (1+ (current-column))) comment-column))))) (defsubst f90-present-statement-cont () "Return continuation properties of present statement.