On 12 May 2014, at 14:14, Stephen Leake <[email protected]> wrote:
> Simon Wright <[email protected]> writes: >> If point is before the ( [which is clearly wrong), the first line only >> is adjusted to have a single space between E and : > > This is a bug in ada-align-region-separate, but I don't think it's worth > fixing. Agreed >> If point is between ( and ), the alignment is correct but an extra >> space is inserted between ) and ;. > > This is fixed by the following patch: > > ============================================================ > --- ada-mode.el 3656169ff84c2d42086171d893b3f440cb8edefe > +++ ada-mode.el 7f084af755b3a9dede32131a5fb44da124df3156 > @@ -689,7 +689,7 @@ Each parameter declaration is represente > ) > > (let ((space-before-p (save-excursion (skip-chars-backward " \t") (not > (bolp)))) > - (space-after-p (save-excursion (skip-chars-forward " \t") (not > (eolp))))) > + (space-after-p (save-excursion (skip-chars-forward " \t") (not (or (= > (char-after) ?\;) (eolp)))))) > (when space-before-p > ;; paramlist starts on same line as subprogram identifier; clean > ;; up whitespace. Allow for code on same line as closing paren The patch works fine, but for some reason I had to apply it by hand. _______________________________________________ Emacs-ada-mode mailing list [email protected] http://host114.hostmonster.com/mailman/listinfo/emacs-ada-mode_stephe-leake.org
