Mercurial > hg > octave-nkf
comparison scripts/plot/title.m @ 3619:a7fe24b18fa4
[project @ 2000-03-22 21:56:18 by jwe]
author | jwe |
---|---|
date | Wed, 22 Mar 2000 21:56:19 +0000 |
parents | ae7adbb591e8 |
children | 78954aeaf321 |
comparison
equal
deleted
inserted
replaced
3618:8cea69ad95ae | 3619:a7fe24b18fa4 |
---|---|
32 if (nargin != 1) | 32 if (nargin != 1) |
33 usage ("title (text)"); | 33 usage ("title (text)"); |
34 endif | 34 endif |
35 | 35 |
36 if (isstr (text)) | 36 if (isstr (text)) |
37 command = sprintf ("gset title \"%s\"", text); | 37 eval (sprintf ("gset title \"%s\"", |
38 eval (command); | 38 undo_string_escapes (undo_string_escapes (text)))); |
39 else | 39 else |
40 error ("title: text must be a string"); | 40 error ("title: text must be a string"); |
41 endif | 41 endif |
42 | 42 |
43 endfunction | 43 endfunction |