diff --git a/R/class2tree.R b/R/class2tree.R
index 5f0ff311..b19ce6a4 100644
--- a/R/class2tree.R
+++ b/R/class2tree.R
@@ -293,7 +293,7 @@ rank_indexing <- function (rankList) {
               for (
                 r in ls(rank2index)[!(ls(rank2index) %in% ls(tmpEnv))]
               ) {
-                if (rank2index[[r]] >= tmpEnv[[subList[i-1]]]) {
+                if (rank2index[[r]] >= currentIndex) {
                   tmpEnv[[r]] <- 
                     rank2index[[r]] + (tmpEnv[[iRank]] - rank2index[[iRank]])
                   flag <- 1