| ︙ | | |
3867
3868
3869
3870
3871
3872
3873
3874
3875
3876
3877
3878
3879
3880
|
3867
3868
3869
3870
3871
3872
3873
3874
3875
3876
3877
3878
3879
3880
3881
|
+
|
-printColorOld <RGB> : Color for old text (0.7 1.0 0.7)
-printColorNew <RGB> : Color for new text (0.8 0.8 1.0)
-plugin <name> : Preprocess files using plugin.
-plugininfo <info> : Pass info to plugin (plugin specific)
-pluginlist : List known plugins
-plugindump <plugin> : Dump plugin source to stdout
-pluginallow : Allow full access for a plugin.
-limit <lines> : Do not process more than <lines> lines.
To list all options matching a prefix, run 'eskil --query prefix'.
In tcsh use this line to get option completion:
complete eskil 'C/-/`eskil --query -`/'}
}
|
| ︙ | | |
3919
3920
3921
3922
3923
3924
3925
3926
3927
3928
3929
3930
3931
3932
3933
|
3920
3921
3922
3923
3924
3925
3926
3927
3928
3929
3930
3931
3932
3933
3934
|
-
+
|
-noparse -line -smallblock -block -char -word -limit -nodiff -dir
-clip -patch -browse -conflict -print -noempty -pivot
-printHeaderSize -printCharsPerLine -printPaper
-printColorChange -printColorOld -printColorNew
-printFont -sep
-server -o -a -fine -r -context -cvs -svn -review
-foreach -preprocess -preprocessleft -preprocessright
-close -nonewline -plugin -plugininfo
-close -nonewline -plugin -plugininfo -pluginallow
-plugindump -pluginlist -nocdiff
}
# If the first option is "--query", use it to ask about options.
if {$::eskil(argc) == 2 && [lindex $::eskil(argv) 0] == "--query"} {
set arg [lindex $::eskil(argv) 1]
if {[lsearch -exact $allOpts $arg] < 0} {
|
| ︙ | | |
3950
3951
3952
3953
3954
3955
3956
3957
3958
3959
3960
3961
3962
3963
|
3951
3952
3953
3954
3955
3956
3957
3958
3959
3960
3961
3962
3963
3964
3965
|
+
|
set doreview 0
set foreach 0
set preferedRev "GIT"
set plugin ""
set plugininfo ""
set plugindump ""
set pluginlist 0
set pluginallow 0
set nocdiff 0
foreach arg $::eskil(argv) {
if {$nextArg != ""} {
if {$nextArg eq "mergeFile"} {
set opts(mergeFile) [file join [pwd] $arg]
} elseif {$nextArg eq "ancestorFile"} {
|
| ︙ | | |
4086
4087
4088
4089
4090
4091
4092
4093
4094
4095
4096
4097
4098
4099
|
4088
4089
4090
4091
4092
4093
4094
4095
4096
4097
4098
4099
4100
4101
4102
4103
|
+
+
|
set nextArg "plugin"
} elseif {$arg eq "-plugininfo"} {
set nextArg "plugininfo"
} elseif {$arg eq "-plugindump"} {
set nextArg "plugindump"
} elseif {$arg eq "-pluginlist"} {
set pluginlist 1
} elseif {$arg eq "-pluginallow"} {
set pluginallow 1
} elseif {$arg eq "-context"} {
set nextArg context
} elseif {$arg eq "-noparse"} {
set ::Pref(parse) 0
} elseif {$arg eq "-line"} {
set ::Pref(parse) 1
} elseif {$arg eq "-smallblock"} {
|
| ︙ | | |
4194
4195
4196
4197
4198
4199
4200
4201
4202
4203
4204
4205
4206
4207
4208
|
4198
4199
4200
4201
4202
4203
4204
4205
4206
4207
4208
4209
4210
4211
4212
|
-
+
|
exit
}
if {$plugindump ne ""} {
printPlugin $plugindump
exit
}
if {$plugin ne ""} {
set pinterp [createPluginInterp $plugin $plugininfo pinfo]
set pinterp [createPluginInterp $plugin $plugininfo $pluginallow pinfo]
if {$pinterp eq ""} {
puts "Bad plugin: $plugin"
printPlugins
exit
}
set opts(plugin) $pinterp
set opts(pluginname) $plugin
|
| ︙ | | |