diff options
| author | oharboe <oharboe@b42882b7-edfa-0310-969c-e2dbd0fdcd60> | 2008-07-16 07:22:17 +0000 |
|---|---|---|
| committer | oharboe <oharboe@b42882b7-edfa-0310-969c-e2dbd0fdcd60> | 2008-07-16 07:22:17 +0000 |
| commit | 396d73ad0cf2f12f2eac1af2ba82ff4878dd78de (patch) | |
| tree | 3b70c162c0f912732a07e8a7ce5828c962144971 /src/helper | |
| parent | 8766d396176a277cf1af4ce9a0bbc20d62fe8eb5 (diff) | |
| download | openocd+libswd-396d73ad0cf2f12f2eac1af2ba82ff4878dd78de.tar.gz openocd+libswd-396d73ad0cf2f12f2eac1af2ba82ff4878dd78de.tar.bz2 openocd+libswd-396d73ad0cf2f12f2eac1af2ba82ff4878dd78de.tar.xz openocd+libswd-396d73ad0cf2f12f2eac1af2ba82ff4878dd78de.zip | |
better error messages for target event scripts.
git-svn-id: svn://svn.berlios.de/openocd/trunk@810 b42882b7-edfa-0310-969c-e2dbd0fdcd60
Diffstat (limited to 'src/helper')
| -rw-r--r-- | src/helper/command.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/helper/command.c b/src/helper/command.c index 45b66d60..c1eacc00 100644 --- a/src/helper/command.c +++ b/src/helper/command.c @@ -100,6 +100,8 @@ command_t* register_command(command_context_t *context, command_t *parent, char } /* accumulate help text in Tcl helptext list. */ Jim_Obj *helptext=Jim_GetGlobalVariableStr(interp, "ocd_helptext", JIM_ERRMSG); + if (Jim_IsShared(helptext)) + helptext = Jim_DuplicateObj(interp, helptext); Jim_Obj *cmd_entry=Jim_NewListObj(interp, NULL, 0); Jim_Obj *cmd_list=Jim_NewListObj(interp, NULL, 0); |