Preparing for content importation.
This commit is contained in:
parent
bd897d8def
commit
9c7a9bb280
@ -10,7 +10,9 @@ Class {
|
|||||||
#superclass : #Object,
|
#superclass : #Object,
|
||||||
#instVars : [
|
#instVars : [
|
||||||
'server',
|
'server',
|
||||||
'pad'
|
'pad',
|
||||||
|
'contents',
|
||||||
|
'url'
|
||||||
],
|
],
|
||||||
#category : #'Grafoscopio-Utils'
|
#category : #'Grafoscopio-Utils'
|
||||||
}
|
}
|
||||||
@ -21,6 +23,16 @@ CodiMD class >> newDefault [
|
|||||||
defaultServer.
|
defaultServer.
|
||||||
]
|
]
|
||||||
|
|
||||||
|
{ #category : #accessing }
|
||||||
|
CodiMD >> contents [
|
||||||
|
^ contents
|
||||||
|
]
|
||||||
|
|
||||||
|
{ #category : #accessing }
|
||||||
|
CodiMD >> contents: anObject [
|
||||||
|
contents := anObject
|
||||||
|
]
|
||||||
|
|
||||||
{ #category : #'as yet unclassified' }
|
{ #category : #'as yet unclassified' }
|
||||||
CodiMD >> defaultServer [
|
CodiMD >> defaultServer [
|
||||||
self server: 'https://docutopia.tupale.co'.
|
self server: 'https://docutopia.tupale.co'.
|
||||||
@ -46,7 +58,17 @@ CodiMD >> server: aUrlString [
|
|||||||
server := aUrlString
|
server := aUrlString
|
||||||
]
|
]
|
||||||
|
|
||||||
|
{ #category : #accessing }
|
||||||
|
CodiMD >> url [
|
||||||
|
^ url
|
||||||
|
]
|
||||||
|
|
||||||
|
{ #category : #accessing }
|
||||||
|
CodiMD >> url: anObject [
|
||||||
|
url := anObject
|
||||||
|
]
|
||||||
|
|
||||||
{ #category : #visiting }
|
{ #category : #visiting }
|
||||||
CodiMD >> visit [
|
CodiMD >> visit [
|
||||||
WebBrowser openOn: self server, '/', self pad.
|
WebBrowser openOn: self url.
|
||||||
]
|
]
|
||||||
|
Loading…
Reference in New Issue
Block a user