FluidLabelSet : FluidDataObject { 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); } }