comparison scripts/help/print_usage.m @ 20038:9fc020886ae9

maint: Clean up m-files to follow Octave coding conventions. Try to trim long lines to < 80 chars. Use '##' for single line comments. Use '(...)' around tests for if/elseif/switch/while. Abut cell indexing operator '{' next to variable. Abut array indexing operator '(' next to variable. Use space between negation operator '!' and following expression. Use two newlines between endfunction and start of %!test or %!demo code. Remove unnecessary parens grouping between short-circuit operators. Remove stray extra spaces (typos) between variables and assignment operators. Remove stray extra spaces from ends of lines.
author Rik <rik@octave.org>
date Mon, 23 Feb 2015 14:54:39 -0800
parents 4197fc428c7d
children 7503499a252b
comparison
equal deleted inserted replaced
20037:a1acca0c2216 20038:9fc020886ae9
111 endf_idx = strfind (help_text, "@end def"); 111 endf_idx = strfind (help_text, "@end def");
112 def_idx = sort ([def_idx, endf_idx]); 112 def_idx = sort ([def_idx, endf_idx]);
113 endl_idx = find (help_text == "\n"); 113 endl_idx = find (help_text == "\n");
114 buffer = ""; 114 buffer = "";
115 for k = 1:length (def_idx) 115 for k = 1:length (def_idx)
116 endl = endl_idx (find (endl_idx > def_idx(k), 1)); 116 endl = endl_idx(find (endl_idx > def_idx(k), 1));
117 if (isempty (endl)) 117 if (isempty (endl))
118 buffer = strcat (buffer, help_text (def_idx(k):end), "\n"); 118 buffer = strcat (buffer, help_text (def_idx(k):end), "\n");
119 else 119 else
120 buffer = strcat (buffer, help_text (def_idx(k):endl)); 120 buffer = strcat (buffer, help_text (def_idx(k):endl));
121 endif 121 endif