From 8c335639d2baae339c6fef30215c334c8740ae2c Mon Sep 17 00:00:00 2001 From: Dimitri Sokolyuk Date: Thu, 29 Oct 2015 07:35:05 +0100 Subject: Simplify --- csta.erl | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) (limited to 'csta.erl') diff --git a/csta.erl b/csta.erl index 4064a7c..7eefbb2 100644 --- a/csta.erl +++ b/csta.erl @@ -1,20 +1,20 @@ -module(csta). --export([co_lines/0, ext_lines/0, decode/1]). +-export([lines/1, decode/1]). -include("CSTA-escape-service.hrl"). decode(Data) -> 'CSTA-escape-service':decode('EscapeArgument', Data). -co_lines() -> - 'CSTA-escape-service':encode('EscapeArgument', #'EscapeArgument'{ - privateData = {private, - {kmeSystemData, {getSystemData, {request, {deviceList, - {category, {standardDevice, networkInterface}}}}}}}}). +lines(co) -> + lines(networkInterface); + +lines(ext) -> + lines(station); -ext_lines() -> +lines(Device) -> 'CSTA-escape-service':encode('EscapeArgument', #'EscapeArgument'{ privateData = {private, {kmeSystemData, {getSystemData, {request, {deviceList, - {category, {standardDevice, station}}}}}}}}). + {category, {standardDevice, Device}}}}}}}}). -- cgit v1.2.3