Changeset 1267 for code/branches/console/src/core/TclBind.cc
- Timestamp:
- May 13, 2008, 6:33:05 PM (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
code/branches/console/src/core/TclBind.cc
r1255 r1267 39 39 { 40 40 ConsoleCommandShortcutGeneric(tcl, createExecutor(createFunctor(&TclBind::tcl), "tcl", AccessLevel::None)); 41 ConsoleCommandShortcutGeneric(bgerror, createExecutor(createFunctor(&TclBind::bgerror), "bgerror", AccessLevel::None)); 41 42 42 43 TclBind::TclBind() … … 147 148 } 148 149 150 void TclBind::bgerror(std::string error) 151 { 152 while (error.size() >= 2 && error[0] == '{' && error[error.size() - 1] == '}') 153 error = error.substr(1, error.size() - 2); 154 155 COUT(1) << "Tcl background error: " << error << std::endl; 156 } 157 149 158 bool TclBind::eval(const std::string& tclcode) 150 159 {
Note: See TracChangeset
for help on using the changeset viewer.