Changeset d52fe9c in tol

Timestamp:

Jun 24, 2010, 1:49:51 PM (16 years ago)

Author:

Víctor de Buen <vdebuen@…>

Branches:

1941-docker-image-to-test, devel, master

Children:

4e559163

Parents:

7508034

Message:

Refs #921
Using new method CheckNonDeclarativeAction

git-svn-id: ​https://www.tol-project.org/svn/tolp/trunk@2318 be4846ae-f051-483a-831f-b64e7d08527f

File:

• tol/btol/text_type/txtgra.cpp (modified) (11 diffs)

tol/btol/text_type/txtgra.cpp

@@ -434 +434 @@
 //--------------------------------------------------------------------
 {
+  if(CheckNonDeclarativeAction("PutEditor")) { return; }
     contens_ = BSys::Editor();
     BText editorPath = Text(Arg(1));
@@ -455 +456 @@
 //--------------------------------------------------------------------
 {
+  if(CheckNonDeclarativeAction("PutLanguage")) { return; }
   contens_ = I2("ENGLISH","CASTELLANO");
   BText& lang = Text(Arg(1));
@@ -1201 +1203 @@
 void BPutTableRealFormat::CalcContens()
 {
+  if(CheckNonDeclarativeAction("PutTableRealFormat")) { return; }
     contens_ = BTableFormat::RealFormat();
     if(Arg(2))
@@ -1232 +1235 @@
 void BPutTableDateFormat::CalcContens()
 {
+  if(CheckNonDeclarativeAction("PutTableDateFormat")) { return; }
     contens_ = BTableFormat::DateFormat().Format();
     if(Arg(2))
@@ -1258 +1262 @@
 //--------------------------------------------------------------------
 {
+  if(CheckNonDeclarativeAction("PutRealFormat")) { return; }
     contens_ = BDat::RealFormat();
     BDat::PutRealFormat(Text(Arg(1)));
@@ -1356 +1361 @@
 //--------------------------------------------------------------------
 {
+  if(CheckNonDeclarativeAction("PutDateFormat")) { return; }
     contens_ = BDateFormat::Defect().Format();
     BDateFormat::Defect() =  BDateFormat(Text(Arg(1)));
@@ -1394 +1400 @@
 //--------------------------------------------------------------------
 {
+  if(CheckNonDeclarativeAction("PutDumpFile")) { return; }
   BBool rewrite = BTRUE;
   if(Arg(2)) { rewrite = (BBool)Real(Arg(2)); }
@@ -1787 +1794 @@
 //--------------------------------------------------------------------
 {
+  if(CheckNonDeclarativeAction("ShowFile")) { return; }
     contens_ = Text(Arg(1));
     BSys::Edit(contens_,1);
@@ -1828 +1836 @@
 //--------------------------------------------------------------------
 {
+  if(CheckNonDeclarativeAction("WriteFile")) { return; }
     BText fileName = Text(Arg(1));
     if(OverWrite(fileName,Text(Arg(2))))
@@ -1851 +1860 @@
 //--------------------------------------------------------------------
 {
+  if(CheckNonDeclarativeAction("AppendFile")) { return; }
     BText fileName = Text(Arg(1));
     if(AppendWrite(fileName,Text(Arg(2))))
@@ -2279 +2289 @@
 //--------------------------------------------------------------------
 {
-    contens_ = GetAbsolutePath(Text(Arg(1)));
+    contens_ = GetStandardAbsolutePath(Text(Arg(1)));
 }