summaryrefslogtreecommitdiffstats
path: root/scilab/modules/graphics
diff options
context:
space:
mode:
authorPierre LANDO <pierre.lando@scilab.org>2010-03-31 17:30:28 +0200
committerPierre LANDO <pierre.lando@scilab.org>2010-03-31 17:30:28 +0200
commitf3dcba7d8e96bfbe21404435d345d299f7ee3203 (patch)
treea6f2169fd26dff52c9c45d2547c41b5137f0ba8e /scilab/modules/graphics
parent1f3e20f78520bdf014480147066b279e5935d8a9 (diff)
downloadscilab-f3dcba7d8e96bfbe21404435d345d299f7ee3203.zip
scilab-f3dcba7d8e96bfbe21404435d345d299f7ee3203.tar.gz
Adding two new line style (bug 6840)
Diffstat (limited to 'scilab/modules/graphics')
-rw-r--r--scilab/modules/graphics/macros/ged.sci2
-rw-r--r--scilab/modules/graphics/tcl/ged/Polyline.tcl2
2 files changed, 2 insertions, 2 deletions
diff --git a/scilab/modules/graphics/macros/ged.sci b/scilab/modules/graphics/macros/ged.sci
index ea405f3..78cef8e 100644
--- a/scilab/modules/graphics/macros/ged.sci
+++ b/scilab/modules/graphics/macros/ged.sci
@@ -1608,7 +1608,7 @@ endfunction
1608function setLineStyle(sty) 1608function setLineStyle(sty)
1609 global ged_handle; h=ged_handle 1609 global ged_handle; h=ged_handle
1610 h.line_style=find(sty==[ "solid" "dash" "dash dot" "longdash dot" .. 1610 h.line_style=find(sty==[ "solid" "dash" "dash dot" "longdash dot" ..
1611 "bigdash dot" "bigdash longdash"]) 1611 "bigdash dot" "bigdash longdash" "dot" "double dot"])
1612 1612
1613endfunction 1613endfunction
1614function setMarkStyle(sty) 1614function setMarkStyle(sty)
diff --git a/scilab/modules/graphics/tcl/ged/Polyline.tcl b/scilab/modules/graphics/tcl/ged/Polyline.tcl
index 063d5a0..40a7376 100644
--- a/scilab/modules/graphics/tcl/ged/Polyline.tcl
+++ b/scilab/modules/graphics/tcl/ged/Polyline.tcl
@@ -299,7 +299,7 @@ combobox $w.frame.style \
299 -textvariable curlinestyle \ 299 -textvariable curlinestyle \
300 -editable false \ 300 -editable false \
301 -command [list SelectLineStyle ] -font $gedFont 301 -command [list SelectLineStyle ] -font $gedFont
302eval $w.frame.style list insert end [list "solid" "dash" "dash dot" "longdash dot" "bigdash dot" "bigdash longdash"] 302eval $w.frame.style list insert end [list "solid" "dash" "dash dot" "longdash dot" "bigdash dot" "bigdash longdash" "dot" "double dot"]
303 303
304#Arrow size factor 304#Arrow size factor
305frame $w.frame.arrowsize -borderwidth 0 305frame $w.frame.arrowsize -borderwidth 0