function varargout = label(varargin)
% LABEL: Returns information about the package and the current machine
%
%    GENERAL
%
%      varargout = register(varargin)
%
%    ABOUT
%
%      -Created:     January 2004
%      -Last update: February 2004
%      -Revision:    0.0.2
%      -Author:      R. S. Schestowitz, University of Manchester
% ==============================================================


if (strcmp(getenv('OS'), 'Linux')),
  msgbox([[get_package], [get_month], ' ', [get_year], ' - Version ', [get_version], ' - ', [getenv('OS')], ' on ', [get_host], '@ ', [get_domain]], 'Package Label');
       % if on Linux, display machine identifier
else
  msgbox([[get_package], [get_month], ' ', [get_year], ' - Version ', [get_version], ' - ', [getenv('OS')]], 'Package Label');
end
