You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
55 lines
1.4 KiB
Python
55 lines
1.4 KiB
Python
FluidLabelSet : FluidDataObject {
|
|
|
|
*new{|server| ^super.new(server) }
|
|
|
|
addLabelMsg{|identifier,label|
|
|
^this.prMakeMsg(\addLabel,id,identifier.asSymbol,label.asSymbol);
|
|
}
|
|
|
|
addLabel{|identifier, label, action|
|
|
actions[\addLabel] = [nil, action];
|
|
this.prSendMsg(this.addLabelMsg(identifier,label));
|
|
}
|
|
|
|
updateLabelMsg{|identifier, label|
|
|
^this.prMakeMsg(\updateLabel, id, identifier.asSymbol, label.asSymbol);
|
|
}
|
|
|
|
updateLabel{|identifier, label, action|
|
|
actions[\updateLabel] = [nil,action];
|
|
this.prSendMsg(this.updateLabelMsg(identifier,label));
|
|
}
|
|
|
|
getLabelMsg{|identifier|
|
|
^this.prMakeMsg(\getLabel, id, identifier.asSymbol);
|
|
}
|
|
|
|
getLabel{|identifier, action|
|
|
actions[\getLabel] = [string(FluidMessageResponse,_,_),action];
|
|
this.prSendMsg(this.getLabelMsg(identifier));
|
|
}
|
|
|
|
deleteLabelMsg{|identifier, action|
|
|
^this.prMakeMsg(\deleteLabel, id, identifier.asSymbol);
|
|
}
|
|
|
|
deleteLabel{|identifier, action|
|
|
actions[\deleteLabel] = [nil, action];
|
|
this.prSendMsg(this.deleteLabelMsg(identifier));
|
|
}
|
|
|
|
clearMsg { ^this.prMakeMsg(\clear,id); }
|
|
|
|
clear { |action|
|
|
actions[\clear] = [nil,action];
|
|
this.prSendMsg(this.clearMsg);
|
|
}
|
|
|
|
printMsg { ^this.prMakeMsg(\print,id); }
|
|
|
|
print { |action=(postResponse)|
|
|
actions[\print] = [string(FluidMessageResponse,_,_),action];
|
|
this.prSendMsg(this.printMsg);
|
|
}
|
|
}
|