[Ruler-commits] r68 - pkg/ruleR/R

[noreply at r-forge.r-project.org]

Author: merysionek
Date: 2012-10-21 23:28:30 +0200 (Sun, 21 Oct 2012)
New Revision: 68

Modified:
   pkg/ruleR/R/ruleR_upgraded_final.R
Log:
.

Modified: pkg/ruleR/R/ruleR_upgraded_final.R
===================================================================
--- pkg/ruleR/R/ruleR_upgraded_final.R	2012-10-21 21:00:18 UTC (rev 67)
+++ pkg/ruleR/R/ruleR_upgraded_final.R	2012-10-21 21:28:30 UTC (rev 68)
@@ -785,7 +785,7 @@
               if(!inherits(x,"IdenSingleRule")){
                                                 if("constantVal"%in%slotNames(x)){k<<-c(k,paste(x at description,x at constantVal)); x<-x at previousRule;desc_list(x)
                                                                                   }else {k<<-c(k,x at description); x<-x at previousRule;desc_list(x)}
-                                                }
+                                                }else{k<<-c(k,"")}
               
               
                                   }