Offray/Grafoscopio
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Adding a limit to the header. to let it be short.

Browse Source
This commit is contained in:
Santiago Bragagnolo 2020-02-22 15:57:31 +00:00 committed by Offray Luna
parent 87dcc43e4d
commit 0efe65d061
3 changed files with 3 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
repository/Grafoscopio/GrafoscopioAbstractNode.class.st
View File

@ -226,7 +226,7 @@ GrafoscopioAbstractNode >> tags: aCollection [
GrafoscopioAbstractNode >> title [ GrafoscopioAbstractNode >> title [
"Returns the receiver header" "Returns the receiver header"
^ header size > 10 ifTrue: [ (header readStream next: 8) , '...' ] ^ header size > 30 ifTrue: [ (header readStream next: 28) , '...' ] ifFalse: [ header ]
] ]
{ #category : #'as yet unclassified' } { #category : #'as yet unclassified' }

7
repository/Grafoscopio/GrafoscopioNewNotebook.class.st
View File

@ -777,12 +777,7 @@ GrafoscopioNewNotebook >> notebookSubMenu [
name: 'See pdf'; name: 'See pdf';
icon: (Smalltalk ui icons iconNamed: #smallInspectIt); icon: (Smalltalk ui icons iconNamed: #smallInspectIt);
action: [ self seePdf ] ]. action: [ self seePdf ] ].
group
addItem: [ :item |
item
name: 'Import Article';
icon: (Smalltalk ui icons iconNamed: #smallInspectIt);
action: [ self importArticle ] ].
group group
addItem: [ :item | addItem: [ :item |
item item

7
repository/Grafoscopio/GrafoscopioNotebook.class.st
View File

@ -748,12 +748,7 @@ GrafoscopioNotebook >> notebookSubMenu [
name: 'See pdf'; name: 'See pdf';
icon: (Smalltalk ui icons iconNamed: #smallInspectIt); icon: (Smalltalk ui icons iconNamed: #smallInspectIt);
action: [ self seePdf ] ]. action: [ self seePdf ] ].
group
addItem: [ :item |
item
name: 'Import Article';
icon: (Smalltalk ui icons iconNamed: #smallInspectIt);
action: [ self importArticle ] ].
group group
addItem: [ :item | addItem: [ :item |
item item