--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/m-toolbox/m/gui/ltpdv/callbacks/ltpdv_plot.m	Wed Nov 23 19:22:13 2011 +0100
@@ -0,0 +1,23 @@
+function ltpdv_plot(varargin)
+
+% Handles
+myh     = varargin{1};
+mainfig = varargin{end};
+
+% Get selected objects
+objs = ltpdv_get_selected_objs(mainfig);
+
+% Pass AOs to iplot
+as = [];
+for j=1:length(objs)
+   obj = objs{j}
+   if isa(obj, 'ao')
+      as = [as obj];
+   else
+      warning('!!! Skipping object %s - it''s not an AO.', obj.name);
+   end
+end
+
+if ~isempty(as)
+   iplot(as)
+end