emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master 8579586 10/40: align: Minor refactoring


From: Daiki Ueno
Subject: [elpa] master 8579586 10/40: align: Minor refactoring
Date: Fri, 22 Jan 2016 22:48:37 +0000

branch: master
commit 857958655b2fd286867c3f56aa1888e68465b6a8
Author: Daiki Ueno <address@hidden>
Commit: Daiki Ueno <address@hidden>

    align: Minor refactoring
---
 gobject-align.el |   11 +++++------
 1 files changed, 5 insertions(+), 6 deletions(-)

diff --git a/gobject-align.el b/gobject-align.el
index b5bd28b..a2c68fc 100644
--- a/gobject-align.el
+++ b/gobject-align.el
@@ -127,8 +127,7 @@
            identifier-start
            identifier-end
            arglist
-           last-token-start
-           c)
+           last-token-start)
        (goto-char (point-max))
        (while (not (bobp))
          (c-backward-syntactic-ws)
@@ -150,7 +149,7 @@
            (while (and (not (bobp))
                        (progn
                          (c-backward-token-2)
-                         (unless (eq (setq c (char-after)) ?,)
+                         (unless (eq (char-after) ?,)
                            (setq last-token-start (point-marker)))))
              (c-backward-syntactic-ws))
            (setq type-start last-token-start))
@@ -431,9 +430,9 @@
           gobject-align-arglist-start-column)
          (forward-char)
          (gobject-align-at-point
-          (- gobject-align-arglist-identifier-start-column
-             gobject-align-arglist-start-column
-             (length "("))))))))
+          (- (+ gobject-align-arglist-identifier-start-column
+                (length "("))
+             gobject-align-arglist-start-column)))))))
 
 (provide 'gobject-align)
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]