Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Changes In Branch dia-pdf Excluding Merge-Ins
This is equivalent to a diff from a2667b5658 to 04b7108ed8
2015-01-10
| ||
18:49 | * scripts/tablelistBind.tcl: Made the "handleMotion" proc more robust. check-in: 79bc7d57e3 user: csaba tags: trunk | |
2015-01-05
| ||
17:37 | Ticket [88507dbd48]. Fixes to the canvas/pdf format, and the diagram viewer itself (error reporting). Leaf check-in: 04b7108ed8 user: andreask tags: dia-pdf | |
17:27 | Merged latest trunk work to the diagram/pdf work. check-in: 6f2e578daa user: andreask tags: dia-pdf | |
2015-01-04
| ||
13:41 | * CHANGES.txt: Eliminated the non-ASCII characters. check-in: a2667b5658 user: csaba tags: trunk | |
13:29 | * CHANGES.txt: Eliminated the non-ASCII characters. check-in: aa7a445b36 user: csaba tags: trunk | |
Changes to apps/diagram-viewer.man.
︙ | |||
73 74 75 76 77 78 79 | 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 | - + + + + | the file. [arg_def (handle) format in] This argument specifies the image format to convert the diagrams into when processing the input. The application recognizes all formats supported by the [package Img] package, i.e. for which it can load a |
︙ |
Added modules/canvas/canvas_pdf.man.
|
Added modules/canvas/canvas_pdf.tcl.
|
Changes to modules/canvas/pkgIndex.tcl.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | + | if {![package vsatisfies [package provide Tcl] 8.4]} {return} package ifneeded canvas::sqmap 0.3.1 [list source [file join $dir canvas_sqmap.tcl]] package ifneeded canvas::zoom 0.2.1 [list source [file join $dir canvas_zoom.tcl]] if {![package vsatisfies [package provide Tcl] 8.5]} { return } package ifneeded canvas::drag 0.1 [list source [file join $dir canvas_drag.tcl]] package ifneeded canvas::edit::points 0.1 [list source [file join $dir canvas_epoints.tcl]] package ifneeded canvas::edit::polyline 0.1 [list source [file join $dir canvas_epolyline.tcl]] package ifneeded canvas::edit::quadrilateral 0.1 [list source [file join $dir canvas_equad.tcl]] package ifneeded canvas::gradient 0.2 [list source [file join $dir canvas_gradient.tcl]] package ifneeded canvas::highlight 0.1 [list source [file join $dir canvas_highlight.tcl]] package ifneeded canvas::mvg 1 [list source [file join $dir canvas_mvg.tcl]] package ifneeded canvas::pdf 1.0.1 [list source [file join $dir canvas_pdf.tcl]] package ifneeded canvas::snap 1.0.1 [list source [file join $dir canvas_snap.tcl]] package ifneeded canvas::tag 0.1 [list source [file join $dir canvas_tags.tcl]] package ifneeded canvas::track::lines 0.1 [list source [file join $dir canvas_trlines.tcl]] |
Changes to modules/diagrams/application.tcl.
︙ | |||
44 45 46 47 48 49 50 | 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 | + - + + + + + + | application::ProcessCmdline $arguments application::Run::$mode return } proc ::diagram::application::showerror {text} { global argv0 if {[catch {package present Tk}]} { |
︙ | |||
462 463 464 465 466 467 468 | 468 469 470 471 472 473 474 475 476 | - + | }] 0]/double(1e6)}] puts "... completed in $sec seconds." after 100 return $dip } # # ## ### ##### ######## ############# ##################### |
Changes to modules/diagrams/pkgIndex.tcl.
1 2 3 4 5 6 7 8 9 10 11 12 13 | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | - + | if {![package vsatisfies [package provide Tcl] 8.5]} { # PRAGMA: returnok return } package ifneeded diagram::navigation 1 [list source [file join $dir navigation.tcl]] package ifneeded diagram::direction 1 [list source [file join $dir direction.tcl]] package ifneeded diagram::element 1 [list source [file join $dir element.tcl]] package ifneeded diagram::attribute 1 [list source [file join $dir attributes.tcl]] package ifneeded diagram::point 1 [list source [file join $dir point.tcl]] package ifneeded diagram::core 1 [list source [file join $dir core.tcl]] package ifneeded diagram::basic 1.0.1 [list source [file join $dir basic.tcl]] package ifneeded diagram 1 [list source [file join $dir diagram.tcl]] |