aboutsummaryrefslogtreecommitdiffstats
path: root/git-gui.sh
diff options
context:
space:
mode:
Diffstat (limited to 'git-gui.sh')
-rwxr-xr-xgit-gui.sh41
1 files changed, 9 insertions, 32 deletions
diff --git a/git-gui.sh b/git-gui.sh
index 890a172fc4..28113220af 100755
--- a/git-gui.sh
+++ b/git-gui.sh
@@ -643,22 +643,16 @@ proc _open_stdout_stderr {cmd} {
}
proc git_read {args} {
- set opt [list]
-
- while {1} {
- switch -- [lindex $args 0] {
- --nice {
- _lappend_nice opt
- }
+ set cmdp [_git_cmd [lindex $args 0]]
+ set args [lrange $args 1 end]
- default {
- break
- }
+ return [_open_stdout_stderr [concat $cmdp $args]]
+}
- }
+proc git_read_nice {args} {
+ set opt [list]
- set args [lrange $args 1 end]
- }
+ _lappend_nice opt
set cmdp [_git_cmd [lindex $args 0]]
set args [lrange $args 1 end]
@@ -667,28 +661,11 @@ proc git_read {args} {
}
proc git_write {args} {
- set opt [list]
-
- while {1} {
- switch -- [lindex $args 0] {
- --nice {
- _lappend_nice opt
- }
-
- default {
- break
- }
-
- }
-
- set args [lrange $args 1 end]
- }
-
set cmdp [_git_cmd [lindex $args 0]]
set args [lrange $args 1 end]
- _trace_exec [concat $opt $cmdp $args]
- return [open [concat [list | ] $opt $cmdp $args] w]
+ _trace_exec [concat $cmdp $args]
+ return [open [concat [list | ] $cmdp $args] w]
}
proc githook_read {hook_name args} {