qbit/go
1
0
Fork 0
mirror of https://github.com/golang/go synced 2024-11-18 10:54:40 -07:00
Code Releases Activity

refactor/rename: allow passing -force flag from Emacs

Browse Source 
Change-Id: Iac9355bc8a98cf61cb3d4ff871723ce466d38531
Reviewed-on: https://go-review.googlesource.com/2912
Reviewed-by: Alan Donovan <adonovan@google.com>
This commit is contained in:
Dominik Honnef 2015-01-15 22:12:18 +01:00 committed by Alan Donovan
parent b09f9e69fa
commit 4a084c7791
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
refactor/rename/rename.el
View File

@ -25,10 +25,12 @@
:type 'string
:group 'go-rename)
(defun go-rename (new-name)
(defun go-rename (new-name &optional force)
"Rename the entity denoted by the identifier at point, using
the `gorename' tool."
(interactive (list (read-string "New name: " (thing-at-point 'symbol))))
the `gorename' tool. With FORCE, call `gorename' with the
`-force' flag."
(interactive (list (read-string "New name: " (thing-at-point 'symbol))
current-prefix-arg))
(if (not buffer-file-name)
(error "Cannot use go-rename on a buffer without a file name"))
;; It's not sufficient to save the current buffer if modified,
@ -50,7 +52,7 @@ the `gorename' tool."
(with-current-buffer (get-buffer-create "*go-rename*")
(setq buffer-read-only nil)
(erase-buffer)
(let ((args (list go-rename-command nil t nil posflag "-to" new-name)))
(let ((args (append (list go-rename-command nil t nil posflag "-to" new-name) (if force '("-force")))))
;; Log the command to *Messages*, for debugging.
(message "Command: %s:" args)
(message "Running gorename...")