hg/stx-libbasic: UnixDesktop.st@3651a18f3703 (annotated)

17761 b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	1	"
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	2	COPYRIGHT (c) 2006 by eXept Software AG
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	3	All Rights Reserved
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	4
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	5	This software is furnished under a license and may be used
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	6	only in accordance with the terms of that license and with the
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	7	inclusion of the above copyright notice. This software may not
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	8	be provided or otherwise made available to, or used by, any
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	9	other person. No title to or ownership of the software is
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	10	hereby transferred.
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	11	"
17723 0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	12	"{ Package: 'stx:libbasic' }"
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	13
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	14	AbstractDesktop subclass:#UnixDesktop
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	15	instanceVariableNames:''
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	16	classVariableNames:''
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	17	poolDictionaries:''
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	18	category:'System-Desktop'
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	19	!
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	20
17761 b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	21	!UnixDesktop class methodsFor:'documentation'!
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	22
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	23	copyright
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	24	"
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	25	COPYRIGHT (c) 2006 by eXept Software AG
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	26	All Rights Reserved
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	27
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	28	This software is furnished under a license and may be used
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	29	only in accordance with the terms of that license and with the
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	30	inclusion of the above copyright notice. This software may not
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	31	be provided or otherwise made available to, or used by, any
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	32	other person. No title to or ownership of the software is
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	33	hereby transferred.
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	34	"
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	35	! !
17723 0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	36
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	37	!UnixDesktop class methodsFor:'accessing'!
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	38
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	39	priority
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	40
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	41	^1
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	42
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	43	"Modified: / 11-08-2009 / 16:40:06 / Jan Vrany <vranyj1@fel.cvut.cz>"
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	44	! !
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	45
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	46	!UnixDesktop class methodsFor:'accessing - defaults'!
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	47
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	48	defaultEditorCommand
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	49	^ (OperatingSystem getEnvironment: 'VISUAL')
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	50	ifNil: [ (OperatingSystem getEnvironment: 'EDITOR') ]
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	51
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	52	"Created: / 11-08-2009 / 16:53:52 / Jan Vrany <vranyj1@fel.cvut.cz>"
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	53	! !
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	54
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	55	!UnixDesktop class methodsFor:'testing'!
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	56
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	57	isAvailable
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	58
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	59	^OperatingSystem isUNIXlike
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	60
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	61	"Modified: / 11-08-2009 / 16:40:30 / Jan Vrany <vranyj1@fel.cvut.cz>"
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	62	! !
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	63
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	64	!UnixDesktop methodsFor:'accessing - commands'!
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	65
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	66	editorCommand
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	67
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	68	^UserPreferences current editorCommand
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	69	ifNil:[self class defaultEditorCommand]
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	70
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	71	"
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	72	Desktop editorCommand
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	73	"
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	74
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	75	"Created: / 11-08-2009 / 17:32:42 / Jan Vrany <vranyj1@fel.cvut.cz>"
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	76	! !
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	77
17941 3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	78	!UnixDesktop methodsFor:'accessing-directories'!
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	79
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	80	desktopDirectory
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	81	\| dir \|
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	82
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	83	dir := OperatingSystem getHomeDirectory.
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	84	^(dir / 'Desktop') exists
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	85	ifTrue: [dir / 'Desktop']
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	86	ifFalse:[dir]
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	87
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	88	"Created: / 09-05-2012 / 11:50:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	89	!
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	90
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	91	documentsDirectory
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	92	\| dir \|
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	93
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	94	dir := OperatingSystem getHomeDirectory.
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	95	^(dir / 'Documents') exists
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	96	ifTrue: [dir / 'Documents']
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	97	ifFalse:[dir]
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	98
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	99	"Created: / 09-05-2012 / 11:50:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	100	! !
3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	101
17723 0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	102	!UnixDesktop methodsFor:'operations'!
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	103
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	104	edit: filenames
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	105
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	106	"
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	107	Opens desktop's preferred editor on given filenames.
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	108
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	109	filenames - a String or Filename or collection of those.
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	110	"
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	111
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	112	^self execute: self editorCommand filenames: filenames
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	113
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	114	"
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	115	Desktop edit: '/home/janfrog/.emacs'
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	116	"
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	117
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	118	"Created: / 11-08-2009 / 17:35:57 / Jan Vrany <vranyj1@fel.cvut.cz>"
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	119	! !
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	120
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	121	!UnixDesktop methodsFor:'operations - private'!
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	122
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	123	execute: command filenames: filenames
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	124
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	125	\| filenamesAsStrings placeholders \|
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	126	filenamesAsStrings := (self toArrayOfFilenames: filenames) collect:[:f\|f asString].
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	127	placeholders := Dictionary new.
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	128	placeholders
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	129	at: 'f' put: (filenamesAsStrings asStringWith: Character space);
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	130	at: 'F' put: filenamesAsStrings first.
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	131
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	132	^self execute: command placeholders: placeholders.
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	133
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	134	"Created: / 11-08-2009 / 17:40:10 / Jan Vrany <vranyj1@fel.cvut.cz>"
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	135	!
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	136
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	137	execute: command placeholders: placeholders
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	138
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	139	^OperatingSystem
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	140	executeCommand:(command expandPlaceholdersWith: placeholders)
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	141
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	142	"
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	143	Desktop edit: '/home/janfrog/.emacs'
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	144	"
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	145
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	146	"Created: / 11-08-2009 / 17:41:45 / Jan Vrany <vranyj1@fel.cvut.cz>"
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	147	! !
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	148
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	149	!UnixDesktop class methodsFor:'documentation'!
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	150
0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	151	version
17941 3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	152	^'$Id: UnixDesktop.st 10808 2012-05-09 15:04:12Z vranyj1 $'
17761 b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	153	!
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	154
b0e5971141bc Added Lookup and BuiltinLookup classes Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17723 diff changeset	155	version_SVN
17941 3651a18f3703 - AbstractDesktop Jan Vrany <jan.vrany@fit.cvut.cz> parents: 17883 diff changeset	156	^ '$Id: UnixDesktop.st 10808 2012-05-09 15:04:12Z vranyj1 $'
17723 0cd9ce703bab - Support for better desktop integration - classes AbstractDesktop and friends. Jan Vrany <jan.vrany@fit.cvut.cz> parents: diff changeset	157	! !

author	Jan Vrany <jan.vrany@fit.cvut.cz>
	Wed, 09 May 2012 16:04:12 +0100
branch	jv
changeset 17941	3651a18f3703
parent 17883	209190914636
child 18011	deb0c3355881
permissions	-rw-r--r--