Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Add command line scripts |
|---|---|
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: | 48fe7eaa15f84aab7816671cea4ff2801ed16c8a |
| User & Date: | kevin 2020-04-10 13:46:42 |
Context
|
2020-04-17
| ||
| 02:03 | Add update user help check-in: aa83c60991 user: kevin tags: trunk | |
|
2020-04-10
| ||
| 13:46 | Add command line scripts check-in: 48fe7eaa15 user: kevin tags: trunk | |
|
2020-03-28
| ||
| 01:48 | More tweaks check-in: 92c1d79950 user: kevin tags: trunk | |
Changes
Added filemorph-add-to-name.bat.
> > > > > > > > > > > > > > > > > > |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
:::FileMorph-add-to-name -- batch interface to FileMorph. © 2020 Kevin Walzer/WordTech Communications LLC. ::check to see if FileMorph is running call ddecmd servers | findstr "FileMorph" If %ERRORLEVEL% EQU 1 start FileMorph.lnk ::check to see if run with or without args if "%~1"=="" ( exit ) else ( timeout 5 call DDECmd execute --server TclEval --topic FileMorph --command "set_directory_path %1" call ddecmd execute --server TclEval --topic FileMorph --command "set_added_text %2" call ddecmd execute --server TclEval --topic FileMorph --command "set_prefix_or_suffix %3" call ddecmd execute --server TclEval --topic FileMorph --command "add_text" ) |
Added filemorph-change-extension.bat.
> > > > > > > > > > > > > > > > > > > |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 |
:::filemorph-change-extension -- batch interface to FileMorph. © 2020 Kevin Walzer/WordTech Communications LLC. ::check to see if FileMorph is running call ddecmd servers | findstr "FileMorph" If %ERRORLEVEL% EQU 1 start FileMorph.lnk ::check to see if run with or without args if "%~1"=="" ( exit ) else ( timeout 5 call DDECmd execute --server TclEval --topic FileMorph --command "set_directory_path %1" call ddecmd execute --server TclEval --topic FileMorph --command "set_old_extension %2" call ddecmd execute --server TclEval --topic FileMorph --command "set_new_extension %3" call ddecmd execute --server TclEval --topic FileMorph --command "change_extension" ) ) |
Added filemorph-change-text.bat.
> > > > > > > > > > > > > > > > > > |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
:::FileMorph-change-text -- batch interface to FileMorph. © 2020 Kevin Walzer/WordTech Communications LLC. ::check to see if FileMorph is running call ddecmd servers | findstr "FileMorph" If %ERRORLEVEL% EQU 1 start FileMorph.lnk ::check to see if run with or without args if "%~1"=="" ( exit ) else ( timeout 5 call DDECmd execute --server TclEval --topic FileMorph --command "set_directory_path %1" call ddecmd execute --server TclEval --topic FileMorph --command "set_old_text %2" call ddecmd execute --server TclEval --topic FileMorph --command "set_new_text %3" call ddecmd execute --server TclEval --topic FileMorph --command "change_text" ) |
Changes to filemorph.pl.
484 485 486 487 488 489 490 491 492 493 494 495 496 497 498 |
-side => "top",
);
}
$textframe->add($listframe);
$textframe->add($noteframe);
#$mw->g_wm_geometry("900x800");
$mw->g_wm_deiconify;
Tkx::after(50);
#This is necessary to get the listbox to draw; sometimes it does not render until the mouse hovers over it
Tkx::focus( -force => $listbox );
|
< |
484 485 486 487 488 489 490 491 492 493 494 495 496 497 |
-side => "top",
);
}
$textframe->add($listframe);
$textframe->add($noteframe);
$mw->g_wm_deiconify;
Tkx::after(50);
#This is necessary to get the listbox to draw; sometimes it does not render until the mouse hovers over it
Tkx::focus( -force => $listbox );
|