X-Git-Url: https://asedeno.scripts.mit.edu/gitweb/?a=blobdiff_plain;f=lib%2Findex.tcl;h=3c1fce7475d362d1880d915ff4bdf168fda28593;hb=0c87a951c2970ec5fe204c3743b467819ee42a64;hp=a0b22f2945c7293f62baf4c497fe6e8119b1df0a;hpb=f4e9996b77415707a20a139463c3e3782e2fa48f;p=git.git diff --git a/lib/index.tcl b/lib/index.tcl index a0b22f294..3c1fce747 100644 --- a/lib/index.tcl +++ b/lib/index.tcl @@ -310,7 +310,7 @@ proc add_helper {txt paths} { update_index \ $txt \ $pathList \ - [concat $after {ui_status {Ready to commit.}}] + [concat $after {ui_status [mc "Ready to commit."]}] } } @@ -386,7 +386,9 @@ proc revert_helper {txt paths} { set reply [tk_dialog \ .confirm_revert \ "[appname] ([reponame])" \ - [mc "Any unstaged changes will be permanently lost by the revert."] \ + "$query + +[mc "Any unstaged changes will be permanently lost by the revert."]" \ question \ 1 \ [mc "Do Nothing"] \