[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 39e7fb6 29/40: Rename some commands
From: |
Daiki Ueno |
Subject: |
[elpa] master 39e7fb6 29/40: Rename some commands |
Date: |
Fri, 22 Jan 2016 22:48:45 +0000 |
branch: master
commit 39e7fb6af0f6cd19273c08b83f1b1a954df8b770
Author: Daiki Ueno <address@hidden>
Commit: Daiki Ueno <address@hidden>
Rename some commands
---
gnome-c-align.el | 14 +++++++-------
gnome-c-snippet.el | 6 +++---
gnome-c-style.el | 6 +++---
gnome-c-tests.el | 24 ++++++++++++------------
4 files changed, 25 insertions(+), 25 deletions(-)
diff --git a/gnome-c-align.el b/gnome-c-align.el
index c7bcddd..dd2dafa 100644
--- a/gnome-c-align.el
+++ b/gnome-c-align.el
@@ -190,7 +190,7 @@
arglist))))
;;;###autoload
-(defun gnome-c-align-at-point (&optional identifier-start-column)
+(defun gnome-c-align-arglist-at-point (&optional identifier-start-column)
"Reformat argument list at point, aligning argument to the right end."
(interactive)
(save-excursion
@@ -409,7 +409,7 @@
(push decl decls))))
decls))))
-(defun gnome-c-align--compute-optimal-columns (beg end)
+(defun gnome-c-align--guess-optimal-columns (beg end)
(let ((buffer (current-buffer))
decls)
(with-temp-buffer
@@ -434,14 +434,14 @@
arglist-identifier-start-column))))))
;;;###autoload
-(defun gnome-c-align-compute-optimal-columns (beg end)
+(defun gnome-c-align-guess-optimal-columns (beg end)
"Compute the optimal alignment rule from the declarations in BEG and END.
This sets `gnome-c-align-identifier-start-column',
`gnome-c-align-arglist-start-column', and
`gnome-c-align-arglist-identifier-start-column'."
(interactive "r")
- (let ((columns (gnome-c-align--compute-optimal-columns beg end)))
+ (let ((columns (gnome-c-align--guess-optimal-columns beg end)))
(setq gnome-c-align-identifier-start-column
(cdr (assq 'identifier-start-column columns))
gnome-c-align-arglist-start-column
@@ -489,7 +489,7 @@ This sets `gnome-c-align-identifier-start-column',
gnome-c-align-arglist-identifier-start-column)))
;;;###autoload
-(defun gnome-c-align-region (beg end)
+(defun gnome-c-align-decls-region (beg end)
"Reformat function declarations in the region between BEG and END."
(interactive "r")
(save-excursion
@@ -499,7 +499,7 @@ This sets `gnome-c-align-identifier-start-column',
(unless (and gnome-c-align-identifier-start-column
gnome-c-align-arglist-start-column
gnome-c-align-arglist-identifier-start-column)
- (let ((columns (gnome-c-align--compute-optimal-columns beg end)))
+ (let ((columns (gnome-c-align--guess-optimal-columns beg end)))
(unless gnome-c-align-identifier-start-column
(setq gnome-c-align-identifier-start-column
(cdr (assq 'identifier-start-column columns))))
@@ -522,7 +522,7 @@ This sets `gnome-c-align-identifier-start-column',
(gnome-c-align--indent-to-column
gnome-c-align-arglist-start-column)
(forward-char)
- (gnome-c-align-at-point
+ (gnome-c-align-arglist-at-point
(- (- gnome-c-align-arglist-identifier-start-column
(length "("))
gnome-c-align-arglist-start-column)))))))
diff --git a/gnome-c-snippet.el b/gnome-c-snippet.el
index 0f18834..85e23e8 100644
--- a/gnome-c-snippet.el
+++ b/gnome-c-snippet.el
@@ -318,7 +318,7 @@ GObjectConstructParam *construct_properties)\n")
(if gnome-c-snippet-align-arglist
(progn
(goto-char arglist-start)
- (gnome-c-align-at-point))
+ (gnome-c-align-arglist-at-point))
(indent-region arglist-start (point)))
(goto-char body-start)
(insert "{
@@ -350,7 +350,7 @@ GParamSpec *pspec)\n")
(if gnome-c-snippet-align-arglist
(progn
(goto-char arglist-start)
- (gnome-c-align-at-point))
+ (gnome-c-align-arglist-at-point))
(indent-region arglist-start (point)))
(goto-char body-start)
(insert "{
@@ -387,7 +387,7 @@ GParamSpec *pspec)\n")
(if gnome-c-snippet-align-arglist
(progn
(goto-char arglist-start)
- (gnome-c-align-at-point))
+ (gnome-c-align-arglist-at-point))
(indent-region arglist-start (point)))
(goto-char body-start)
(insert "{
diff --git a/gnome-c-style.el b/gnome-c-style.el
index c39c0d1..0ea5f93 100644
--- a/gnome-c-style.el
+++ b/gnome-c-style.el
@@ -54,11 +54,11 @@
(defvar gnome-c-style-mode-map
(let ((keymap (make-sparse-keymap)))
- (define-key keymap "\C-c\C-ga" 'gnome-c-align-at-point)
- (define-key keymap "\C-c\C-gr" 'gnome-c-align-region)
+ (define-key keymap "\C-c\C-ga" 'gnome-c-align-arglist-at-point)
+ (define-key keymap "\C-c\C-gr" 'gnome-c-align-decls-region)
(define-key keymap "\C-c\C-gf" 'gnome-c-align-set-column)
(define-key keymap "\C-c\C-gg" 'gnome-c-align-guess-columns)
- (define-key keymap "\C-c\C-g\C-g" 'gnome-c-align-compute-optimal-columns)
+ (define-key keymap "\C-c\C-g\C-g" 'gnome-c-align-guess-optimal-columns)
(define-key keymap "\C-c\C-gc" 'gnome-c-snippet-insert-package_class)
(define-key keymap "\C-c\C-gC" 'gnome-c-snippet-insert-PACKAGE_CLASS)
(define-key keymap "\C-c\C-g\C-c" 'gnome-c-snippet-insert-PackageClass)
diff --git a/gnome-c-tests.el b/gnome-c-tests.el
index c49b0b5..59ae8ee 100644
--- a/gnome-c-tests.el
+++ b/gnome-c-tests.el
@@ -78,46 +78,46 @@ int *bar (const char * const **a,
int b);
")
-(ert-deftest gnome-c-test-align--compute-optimal-columns ()
- "Tests the `gnome-c-align--compute-optimal-columns'."
+(ert-deftest gnome-c-test-align--guess-optimal-columns ()
+ "Tests the `gnome-c-align--guess-optimal-columns'."
(with-temp-buffer
(insert gnome-c-test-program-1)
(c-mode)
(let* (gnome-c-align-max-column
(columns
- (gnome-c-align--compute-optimal-columns (point-min) (point-max))))
+ (gnome-c-align--guess-optimal-columns (point-min) (point-max))))
(should (= (cdr (assq 'identifier-start-column columns)) 9))
(should (= (cdr (assq 'arglist-start-column columns)) 41))
(should (= (cdr (assq 'arglist-identifier-start-column columns)) 64)))))
(ert-deftest gnome-c-test-align-region ()
- "Tests the `gnome-c-align-region'."
+ "Tests the `gnome-c-align-decls-region'."
(with-temp-buffer
(insert gnome-c-test-program-1)
(c-mode)
(let (gnome-c-align-max-column)
- (gnome-c-align-compute-optimal-columns (point-min) (point-max))
- (gnome-c-align-region (point-min) (point-max)))
+ (gnome-c-align-guess-optimal-columns (point-min) (point-max))
+ (gnome-c-align-decls-region (point-min) (point-max)))
(should (equal (buffer-string) gnome-c-test-program-1-aligned))))
(ert-deftest gnome-c-test-align-region-2 ()
- "Tests the `gnome-c-align-region'."
+ "Tests the `gnome-c-align-decls-region'."
(with-temp-buffer
(insert gnome-c-test-program-4)
(c-mode)
(let (gnome-c-align-max-column)
- (gnome-c-align-compute-optimal-columns (point-min) (point-max))
- (gnome-c-align-region (point-min) (point-max)))
+ (gnome-c-align-guess-optimal-columns (point-min) (point-max))
+ (gnome-c-align-decls-region (point-min) (point-max)))
(should (equal (buffer-string) gnome-c-test-program-4-aligned))))
(ert-deftest gnome-c-test-align-region-3 ()
- "Tests the `gnome-c-align-region'."
+ "Tests the `gnome-c-align-decls-region'."
(with-temp-buffer
(insert gnome-c-test-program-5)
(c-mode)
(let (gnome-c-align-max-column)
- (gnome-c-align-compute-optimal-columns (point-min) (point-max))
- (gnome-c-align-region (point-min) (point-max)))
+ (gnome-c-align-guess-optimal-columns (point-min) (point-max))
+ (gnome-c-align-decls-region (point-min) (point-max)))
(should (equal (buffer-string) gnome-c-test-program-5-aligned))))
(ert-deftest gnome-c-test-align-guess-columns-1 ()
- [elpa] master abb9dd4 21/40: Revert "align: Add a room before '*' for arguments", (continued)
- [elpa] master abb9dd4 21/40: Revert "align: Add a room before '*' for arguments", Daiki Ueno, 2016/01/22
- [elpa] master d608680 20/40: align: Add a room before '*' for arguments, Daiki Ueno, 2016/01/22
- [elpa] master 147931d 27/40: Fix typo, Daiki Ueno, 2016/01/22
- [elpa] master ec40108 23/40: align: Use `max' as much as possible, Daiki Ueno, 2016/01/22
- [elpa] master d6d27bd 22/40: align: Reimplement d6086809, Daiki Ueno, 2016/01/22
- [elpa] master ccb6062 24/40: tests: Bind `gnome-align-max-column', Daiki Ueno, 2016/01/22
- [elpa] master f339477 28/40: Add references to developer.gnome.org, Daiki Ueno, 2016/01/22
- [elpa] master 78a0cce 31/40: align: Fix `max' usage, Daiki Ueno, 2016/01/22
- [elpa] master 03f8dca 32/40: tests: Add line wrapping tests, Daiki Ueno, 2016/01/22
- [elpa] master a65924c 26/40: align: Remove spaces between two '*', Daiki Ueno, 2016/01/22
- [elpa] master 39e7fb6 29/40: Rename some commands,
Daiki Ueno <=
- [elpa] master 570b52f 30/40: snippet: Fix indentation, Daiki Ueno, 2016/01/22
- [elpa] master e84487c 35/40: snippet: Add FIXME comment, Daiki Ueno, 2016/01/22
- [elpa] master b04d18e 33/40: Change copyright holder to FSF, Daiki Ueno, 2016/01/22
- [elpa] master 06c8a6a 38/40: * packages/gnome-c-style/gnome-c-tests.el: Really add copyright blurb, Daiki Ueno, 2016/01/22
- [elpa] master 8d0f8c1 37/40: Fix command names in comment, Daiki Ueno, 2016/01/22
- [elpa] master b26ba73 34/40: snippet: Add missing GObjectClass vfunc, Daiki Ueno, 2016/01/22
- [elpa] master 1054ea1 39/40: Add links to GNOME programming guideline, Daiki Ueno, 2016/01/22
- [elpa] master 957d395 36/40: maint: Fix license notice, Daiki Ueno, 2016/01/22
- [elpa] master eaa2c7a 40/40: Merge commit '1054ea1bc5b07a1438a18c1b33f4266b28ff9d77', Daiki Ueno, 2016/01/22
- [elpa] master 7f7d7cb 16/40: Rename to gnome-minor-mode, Daiki Ueno, 2016/01/22