function [h, icons, plots, legend_text] = addLegendItem(item, pos)
% Add an item to the legend
% SYNTAX:
%   addLegendItem(<item>, <pos>);
%
% EXAMPLE:
%   addLegendItem("item", 2);;
%
% INPUT:
%   item = new entry
%   pos  = position in the list of inputs
%
% DEFAULT VALUES:
%   fig_handle = gcf;
%

%--------------------------------------------------------------------------
%               ___ ___ ___
%     __ _ ___ / __| _ | __|
%    / _` / _ \ (_ |  _|__ \
%    \__, \___/\___|_| |___/
%    |___/                    v 1.0RC1
%
%--------------------------------------------------------------------------
%  Copyright (C) 2021 Geomatics Research & Development srl (GReD)
%  Written by:       Andrea Gatti
%  Contributors:     Andrea Gatti, ...
%  A list of all the historical goGPS contributors is in CREDITS.nfo
%--------------------------------------------------------------------------
%
%    This program is free software: you can redistribute it and/or modify
%    it under the terms of the GNU General Public License as published by
%    the Free Software Foundation, either version 3 of the License, or
%    (at your option) any later version.
%
%    This program is distributed in the hope that it will be useful,
%    but WITHOUT ANY WARRANTY; without even the implied warranty of
%    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
%    GNU General Public License for more details.
%
%    You should have received a copy of the GNU General Public License
%    along with this program.  If not, see <http://www.gnu.org/licenses/>.
%
%--------------------------------------------------------------------------
% 01100111 01101111 01000111 01010000 01010011
%--------------------------------------------------------------------------
    l = legend; 
    outm = get(l,'String');
    if nargin == 1
        pos = numel(outm) + 1;
    end
    if isempty(outm)
        [h, icons, plots, legend_text] = legend(item, 'Location', 'eastoutside'); 
        n_entry = 1;
        icons = icons(n_entry + 2 : 2 : end);
    else
        outm{pos} = item;
        [h, icons] = legend(outm, 'Location', 'eastoutside');
        n_entry = numel(outm);
        icons = icons(n_entry + 2 : 2 : end);
    end
end
