--- a/Tools__VisualProfilerCanvas.st Sun Nov 04 22:42:25 2012 +0100
+++ b/Tools__VisualProfilerCanvas.st Sun Nov 04 22:42:49 2012 +0100
@@ -487,6 +487,7 @@
"Do not manually edit this!! If it is corrupted,
the MenuEditor may not be able to read the specification."
+
"
MenuEditor new openOnClass:Tools::VisualProfilerCanvas andSelector:#sidebarMenu
(Menu new fromLiteralArrayEncoding:(Tools::VisualProfilerCanvas sidebarMenu)) startUp
@@ -498,18 +499,15 @@
#(Menu
(
(MenuItem
- label: 'Save'
+ label: 'Save Profile Data'
itemValue: saveProfilerAction
- translateLabel: true
+ isButton: true
labelImage: (ResourceRetriever ToolbarIconLibrary saveToFileIcon)
)
)
nil
nil
)
-
- "Modified: / 24-11-2007 / 09:10:50 / janfrog"
- "Modified: / 08-11-2011 / 16:42:53 / cg"
! !
!VisualProfilerCanvas class methodsFor:'plugIn spec'!
@@ -896,8 +894,8 @@
!
saveProfilerAction
+ | file profiler |
- | file profiler |
file := Dialog requestFileName:'Select file' pattern:'*.profiler.boss'.
file isEmptyOrNil ifTrue:[^self].
profiler := self profilerStatistics value.
@@ -910,7 +908,7 @@
!VisualProfilerCanvas::CallTreeItem class methodsFor:'documentation'!
version
- ^'$Header: /cvs/stx/stx/libtool/Tools__VisualProfilerCanvas.st,v 1.6 2011-11-18 14:05:52 cg Exp $'
+ ^'$Header: /cvs/stx/stx/libtool/Tools__VisualProfilerCanvas.st,v 1.7 2012-11-04 21:42:49 cg Exp $'
! !
!VisualProfilerCanvas::CallTreeItem class methodsFor:'instance creation'!
@@ -1106,11 +1104,11 @@
!VisualProfilerCanvas class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Tools__VisualProfilerCanvas.st,v 1.6 2011-11-18 14:05:52 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__VisualProfilerCanvas.st,v 1.7 2012-11-04 21:42:49 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/Tools__VisualProfilerCanvas.st,v 1.6 2011-11-18 14:05:52 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__VisualProfilerCanvas.st,v 1.7 2012-11-04 21:42:49 cg Exp $'
!
version_SVN