Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Cleanup |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: | 13a5f0c2ec1f9bad7d6c9ed231da884a1ada8125 |
| User & Date: | dennis2 2002-06-15 19:47:30 |
Context
|
2002-06-15
| ||
| 20:07 | Cleanup check-in: 8f29553668 user: dennis2 tags: trunk | |
| 19:47 | Cleanup check-in: 13a5f0c2ec user: dennis2 tags: trunk | |
| 19:42 | Code cleanup check-in: fbb8fbef44 user: dennis2 tags: trunk | |
Changes
Changes to lib/Browse.mac.
1 2 3 4 5 6 7 8 9 10 11 12 13 |
#-------------------------------------------------------------------------
# Sample macro file for Tcl TextEdit 0.9.7
#-------------------------------------------------------------------------
#This macro tryes to find netscape and start it with the current open file
#as input.
global window current_window
set a [exec "whereis" "netscape"]
set netscape ""
for {set i 0} {$i<[llength $a]} {incr i} {
|
| | |
1 2 3 4 5 6 7 8 9 10 11 12 13 |
#-------------------------------------------------------------------------
# Sample macro file for TclTextEdit 0.9.7
#-------------------------------------------------------------------------
#This macro tryes to find netscape and start it with the current open file
#as input. intened to be used as preview of html code
global window current_window
set a [exec "whereis" "netscape"]
set netscape ""
for {set i 0} {$i<[llength $a]} {incr i} {
|
Changes to lib/Close.mac.
1 2 |
global current_window file::Close $current_window |
> > > > |
1 2 3 4 5 6 |
#------------------------------------------------------------------------- # Macro file for TclTextEdit #------------------------------------------------------------------------- global current_window file::Close $current_window |
Changes to lib/HelloWorld.mac.
1 2 3 4 5 |
#------------------------------------------------------------------------- # Sample macro file for Tcl TextEdit 0.9.7 #------------------------------------------------------------------------- macro::key "Hello World!" |
| |
1 2 3 4 5 |
#------------------------------------------------------------------------- # Sample macro file for TclTextEdit #------------------------------------------------------------------------- macro::key "Hello World!" |
Changes to lib/Macro_Dialog.mac.
1 2 3 4 5 |
#------------------------------------------------------------------------- # Sample macro file for Tcl TextEdit 0.9.7 #------------------------------------------------------------------------- macro::manager |
| |
1 2 3 4 5 |
#------------------------------------------------------------------------- # Sample macro file for TclTextEdit #------------------------------------------------------------------------- macro::manager |
Changes to lib/New.mac.
1 |
file::NewFile |
> > > > |
1 2 3 4 5 |
#------------------------------------------------------------------------- # Macro file for TclTextEdit #------------------------------------------------------------------------- file::NewFile |
Changes to lib/Open.mac.
1 |
file::Load {file}
|
> > > > |
1 2 3 4 5 |
#------------------------------------------------------------------------- # Macro file for TclTextEdit #------------------------------------------------------------------------- file::Load {file} |
Changes to lib/Save.mac.
1 2 3 |
global window current_window
file::Save $window($current_window,info) -force
|
< > > > > |
1 2 3 4 5 6 |
#------------------------------------------------------------------------- # Macro file for TclTextEdit #------------------------------------------------------------------------- global window current_window file::Save $window($current_window,info) -force |
Changes to lib/SpecChar.mac.
1 |
specc::specc -win .text |
> > > > |
1 2 3 4 5 |
#------------------------------------------------------------------------- # Macro file for TclTextEdit #------------------------------------------------------------------------- specc::specc -win .text |
Changes to lib/TCL-Exec.mac.
2 3 4 5 6 7 8 9 10 11 12 |
#------------------------------------------------------------------------- # Sample macro file for Tcl TextEdit 0.9.7 #------------------------------------------------------------------------- #This macro execute the current the file in the currently- # visible window #global window current_window #exec "wish" $window($current_window,name) ls |
| | < < |
2 3 4 5 6 7 8 9 10 |
#------------------------------------------------------------------------- # Sample macro file for Tcl TextEdit 0.9.7 #------------------------------------------------------------------------- #This macro execute the current the file in the currently- # visible window global window current_window exec "wish" $window($current_window,name) |