Eskil

Check-in [65a2768e2e]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Added -subst command line, to acces PreProcess Subst function.
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: 65a2768e2e7fd61768e38208f275ffc20162e658745b04692d8b0ca885346950
User & Date: peter 2019-07-05 11:34:17.267
Context
2019-07-05
11:48
Ctrl-E to enable Edit Mode. Do not ask about overwriting in Edit Mode. Hidden preference to turn it on. check-in: a165dd464b user: peter tags: trunk
11:34
Added -subst command line, to acces PreProcess Subst function. check-in: 65a2768e2e user: peter tags: trunk
11:02
Include version in command line help check-in: 24353cd8ba user: peter tags: trunk
Changes
Unified Diff Ignore Whitespace Patch
Changes to Changes. 
1







2
3
4
5
6
7
8

2019-02-11








Released 2.8.4

2019-02-06
 Bumped revision to 2.8.4

2019-02-04

|
>
>
>
>
>
>
>








1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

2019-07-05
 Added -subst command line, to acces PreProcess Subst function.

2019-06-12
 Better SVN commit, when added directories are included.

2019-03-12
 Auto-open prefix group dialog.

Released 2.8.4

2019-02-06
 Bumped revision to 2.8.4

2019-02-04
︙︙
Changes to htdocs/changes.wiki. 
1
2
3
4
5


6
7
8
9
10
11
12

<title>Changes</title>

Upcoming changes (not yet released):

  *  TBW



Changes in v2.8.4 (2019-02-06):

  *  Commit dialog includes a selection of files, for partial commit.
  *  Better support for multiple files and directories with -review.
  *  Added save-reload option in edit mode.
  *  Bug-fix with deleted files in GIT directory diff.






>
>








1
2
3
4
5
6
7
8
9
10
11
12
13
14

<title>Changes</title>

Upcoming changes (not yet released):

  *  TBW
  *  Added -subst command line, to acces PreProcess Subst function.
  *  Better SVN commit, handling added directories.

Changes in v2.8.4 (2019-02-06):

  *  Commit dialog includes a selection of files, for partial commit.
  *  Better support for multiple files and directories with -review.
  *  Added save-reload option in edit mode.
  *  Bug-fix with deleted files in GIT directory diff.
︙︙
Changes to src/startup.tcl.
︙︙
774
775
776
777
778
779
780


781
782
783
784
785
786
787

    addPrefMultOpt -excludedir dir,exdirs
    docFlag    -excludedir "Exclude from directory diff"
    addPrefMultOpt -excludefile dir,exfiles
    docFlag    -excludefile "Exclude from directory diff"
    # These affect Pref but via special processing later
    addMultOpt -prefix
    docFlag    -prefix "Care mainly about words starting with <str>"


    addMultOpt -preprocess
    addMultOpt -preprocessleft
    addMultOpt -preprocessright
    docFlag    -preprocess  "The <pair> is a list of RE+Subst applied to each line before compare"
    docFlag    -preprocessleft  "Use <pair> only on left side"
    docFlag    -preprocessright "Use <pair> only on right side"
    # These affect opts








>
>








774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789

    addPrefMultOpt -excludedir dir,exdirs
    docFlag    -excludedir "Exclude from directory diff"
    addPrefMultOpt -excludefile dir,exfiles
    docFlag    -excludefile "Exclude from directory diff"
    # These affect Pref but via special processing later
    addMultOpt -prefix
    docFlag    -prefix "Care mainly about words starting with <str>"
    addMultOpt -subst
    docFlag    -subst  "The <pair> is a list of Left+Right, used for subst preprocessing"
    addMultOpt -preprocess
    addMultOpt -preprocessleft
    addMultOpt -preprocessright
    docFlag    -preprocess  "The <pair> is a list of RE+Subst applied to each line before compare"
    docFlag    -preprocessleft  "Use <pair> only on left side"
    docFlag    -preprocessright "Use <pair> only on right side"
    # These affect opts
︙︙
914
915
916
917
918
919
920












921
922
923
924
925
926
927

        foreach apa $arg {
            set RE [string map [list % $apa] {^.*?\m(%\w+).*$}]
            if {$::Pref(nocase)} {
                set RE "(?i)$RE"
            }
            addPreprocess prefix $RE {\1} ""
        }












    }
    if {[optIsGiven -preprocess arg]} {
        # FIXA: better validity check
        foreach apa $arg {
            foreach {RE sub} $apa {
                addPreprocess cmdline $RE $sub ""
            }








>
>
>
>
>
>
>
>
>
>
>
>








916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941

        foreach apa $arg {
            set RE [string map [list % $apa] {^.*?\m(%\w+).*$}]
            if {$::Pref(nocase)} {
                set RE "(?i)$RE"
            }
            addPreprocess prefix $RE {\1} ""
        }
    }
    if {[optIsGiven -subst arg]} {
        # FIXA: better validity check
        foreach apa $arg {
            foreach {left right} $apa {
                if {$::Pref(nocase)} {
                    set left "(?i)$left"
                    set right "(?i)$right"
                }
                addPreprocess subst $left $right Subst
            }
        }
    }
    if {[optIsGiven -preprocess arg]} {
        # FIXA: better validity check
        foreach apa $arg {
            foreach {RE sub} $apa {
                addPreprocess cmdline $RE $sub ""
            }
︙︙