New accessors.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2020-08-28 20:24:25 -05:00
parent 1c54938532
commit f73ca8ef32
1 changed files with 15 additions and 0 deletions

View File

@ -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.