Eskil

Check-in [f26f4f3a55]
Login

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

Overview
Comment:Correct depth with committing dirs.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | trunk
Files: files | file ages | folders
SHA3-256: f26f4f3a55218f3efb610dd0b6d24b5233e7c551cff234be7fe6d61e212a3f53
User & Date: peter 2019-06-12 11:47:02
Context
2019-06-12
11:47
Correct depth with committing dirs. Leaf check-in: f26f4f3a55 user: peter tags: trunk
11:37
Include added dirs in SVN commit. [e947536c41] check-in: 4dcf31775f user: peter tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to src/rev.tcl.

1279
1280
1281
1282
1283
1284
1285

1286
1287
1288
1289
1290
1291
1292
1293
....
1875
1876
1877
1878
1879
1880
1881
1882
1883
1884
1885
1886
1887
1888
1889
    if {[llength $args] == 0} {
        set target all
    } elseif {[llength $args] == 1} {
        set target [file tail [lindex $args 0]]
    } else {
        set target "[file tail [lindex $args 0]] ..."
    }

    set precmd [list svn -q commit -m]
    set postcmd $args
    CommitDialog $top $target SVN $precmd $postcmd
}

# Does anything else needs to be committed with this file?
# Typically that would be added directories in SVN.
proc eskil::rev::SVN::commitFileDependency {filename} {
................................................................................
        }
        # None left means ignore.
        if {[llength $todo] == 0} {
            return
        }
    }

    if {[info commands eskil::rev::${system}::commitFileDependency]} {
        foreach filename $todo {
            lappend todo {*}[eskil::rev::${system}::commitFileDependency $filename]
        }
    }

    # Splash screen for visual feedback
    set now [clock clicks -milliseconds]







>
|







 







|







1279
1280
1281
1282
1283
1284
1285
1286
1287
1288
1289
1290
1291
1292
1293
1294
....
1876
1877
1878
1879
1880
1881
1882
1883
1884
1885
1886
1887
1888
1889
1890
    if {[llength $args] == 0} {
        set target all
    } elseif {[llength $args] == 1} {
        set target [file tail [lindex $args 0]]
    } else {
        set target "[file tail [lindex $args 0]] ..."
    }
    # Any explict dirs mentioned should not recurse.
    set precmd [list svn -q commit --depth=empty -m]
    set postcmd $args
    CommitDialog $top $target SVN $precmd $postcmd
}

# Does anything else needs to be committed with this file?
# Typically that would be added directories in SVN.
proc eskil::rev::SVN::commitFileDependency {filename} {
................................................................................
        }
        # None left means ignore.
        if {[llength $todo] == 0} {
            return
        }
    }

    if {[info commands eskil::rev::${system}::commitFileDependency] ne ""} {
        foreach filename $todo {
            lappend todo {*}[eskil::rev::${system}::commitFileDependency $filename]
        }
    }

    # Splash screen for visual feedback
    set now [clock clicks -milliseconds]