vb_users_manual_url

 Retrieve url to access vbmeg_users_manual.htm by specifying keyword.
 This function is used with vb_help_info_get.m

 [Input]
     caption_str : string for search.

 [Output]
    url_list : url to vbmeg_users_manual.htm

 [see]
    vb_users_manual_info_get.m

 [Example]
    url_list = vb_users_manual_url('Data import');
    web(url_list);

 Copyright (C) 2011, ATR All Rights Reserved.
 License : New BSD License(see VBMEG_LICENSE.txt)

0001 function [url_list] = vb_users_manual_url(caption_str)
0002 % Retrieve url to access vbmeg_users_manual.htm by specifying keyword.
0003 % This function is used with vb_help_info_get.m
0004 %
0005 % [Input]
0006 %     caption_str : string for search.
0007 %
0008 % [Output]
0009 %    url_list : url to vbmeg_users_manual.htm
0010 %
0011 % [see]
0012 %    vb_users_manual_info_get.m
0013 %
0014 % [Example]
0015 %    url_list = vb_users_manual_url('Data import');
0016 %    web(url_list);
0017 %
0018 % Copyright (C) 2011, ATR All Rights Reserved.
0019 % License : New BSD License(see VBMEG_LICENSE.txt)
0020 
0021 
0022 %
0023 % --- Previous check
0024 %
0025 if ~exist('caption_str', 'var')
0026     error('caption_str should be specified.');
0027 end
0028 
0029 
0030 %
0031 % --- Main Procedure
0032 %
0033 [caption_list, caption_url_list] = vb_users_manual_info_get;
0034 
0035 ix = strmatch(caption_str, caption_list);
0036 if isempty(ix)
0037     error('Invalid caption_str was specified.');
0038 end
0039 if length(ix) == 1
0040     url_list = caption_url_list{ix};
0041 else
0042     url_list = caption_url_list(ix);
0043 end