New accessors.
This commit is contained in:
parent
1c54938532
commit
f73ca8ef32
@ -23,6 +23,16 @@ CodiMD class >> newDefault [
|
||||
defaultServer.
|
||||
]
|
||||
|
||||
{ #category : #accessing }
|
||||
CodiMD >> contents [
|
||||
^ contents
|
||||
]
|
||||
|
||||
{ #category : #accessing }
|
||||
CodiMD >> contents: anObject [
|
||||
contents := anObject
|
||||
]
|
||||
|
||||
{ #category : #'as yet unclassified' }
|
||||
CodiMD >> defaultServer [
|
||||
self server: 'https://docutopia.tupale.co'.
|
||||
@ -92,6 +102,11 @@ CodiMD >> url [
|
||||
^ url asUrl
|
||||
]
|
||||
|
||||
{ #category : #accessing }
|
||||
CodiMD >> url: anObject [
|
||||
url := anObject
|
||||
]
|
||||
|
||||
{ #category : #visiting }
|
||||
CodiMD >> visit [
|
||||
WebBrowser openOn: self server, '/', self pad.
|
||||
|
Loading…
Reference in New Issue
Block a user