Re: [PATCH] bzr completion: modified files

[Sebastien Alaiwan <sebastien.alaiwan@gmail.com>]

[-- Attachment #1.1: Type: text/plain, Size: 275 bytes --]

On 04/17/2014 09:53 PM, Sebastien Alaiwan wrote:
> Hi there,
>
> here's a patch allowing completing 'bzr commit' and 'bzr revert' with a list of versionned AND modified files (instead of a list of versionned files).
Sorry, here's instead a patch version with full path.

[-- Attachment #1.2: bzr_completion_modified_files.diff --]
[-- Type: text/plain, Size: 1117 bytes --]

diff --git a/Completion/Unix/Command/_bzr b/Completion/Unix/Command/_bzr
index ab9fd72..c28c214 100644
--- a/Completion/Unix/Command/_bzr
+++ b/Completion/Unix/Command/_bzr
@@ -46,6 +46,14 @@ _bzr_versionedFiles() {
     return 0
 }
 
+(( $+functions[_bzr_modifiedFiles] )) ||
+_bzr_modifiedFiles() {
+    local fileList
+    fileList=(${(ps:\0:)"$(bzr status . --versioned --short | cut -b 5- | tr '\n' '\0')"})
+    compadd -af fileList
+    return 0
+}
+
 (( $+functions[_bzr_completeParents] )) ||
 _bzr_completeParents() {
     local parentFile=$(bzr root 2>/dev/null)/.bzr/branch/parent
@@ -214,7 +222,7 @@ case $cmd in
 	'--unchanged[include unchanged files]'
 	'(-q --quiet -v --verbose)'{--quiet,-q}'[be quiet]'
 	'(-v --verbose -q --quiet)'{--verbose,-v}'[display more information]'
-	'*:modified files:_bzr_versionedFiles'
+	'*:modified files:_bzr_modifiedFiles'
 	)
     ;;
 
@@ -300,7 +308,7 @@ case $cmd in
     args+=(
 	'--no-backup[skip generation of backup~ files]'
 	'(-r --revision)'{--revision=,-r}'[revision]:revision:'
-	'*:file:_bzr_versionedFiles'
+	'*:file:_bzr_modifiedFiles'
 	)
     ;;
 

[-- Attachment #2: OpenPGP digital signature --]
[-- Type: application/pgp-signature, Size: 897 bytes --]