summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--csta.erl15
-rw-r--r--kme.erl6
2 files changed, 14 insertions, 7 deletions
diff --git a/csta.erl b/csta.erl
index 57f622a..c47b78c 100644
--- a/csta.erl
+++ b/csta.erl
@@ -1,10 +1,17 @@
-module(csta).
--export([co_lines/0]).
+-export([co_lines/0, ext_lines/0]).
-include("CSTA-escape-service.hrl").
co_lines() ->
- {ok, CO} = kme:co_lines(),
- 'CSTA-escape-service':encode('EscapeArgument',
- #'EscapeArgument'{privateData = CO}).
+ 'CSTA-escape-service':encode('EscapeArgument', #'EscapeArgument'{
+ privateData = {private,
+ {kmeSystemData, {getSystemData, {request, {deviceList,
+ {category, {standardDevice, networkInterface}}}}}}}}).
+
+ext_lines() ->
+ 'CSTA-escape-service':encode('EscapeArgument', #'EscapeArgument'{
+ privateData = {private,
+ {kmeSystemData, {getSystemData, {request, {deviceList,
+ {category, {standardDevice, station}}}}}}}}).
diff --git a/kme.erl b/kme.erl
index 489e207..64c8fde 100644
--- a/kme.erl
+++ b/kme.erl
@@ -5,6 +5,6 @@
-include("KME-specific-types.hrl").
co_lines() ->
- 'KME-specific-types':encode('KMESpecificPrivateData', {kmeSystemData,
- {getSystemData, {request, {deviceList, {category,
- {standardDevice, networkInterface}}}}}}).
+ 'KME-specific-types':encode('KMESpecificPrivateData',
+ {kmeSystemData, {getSystemData, {request, {deviceList,
+ {category, {standardDevice, networkInterface}}}}}}).