diff --git a/src/66/66-tree.c b/src/66/66-tree.c
index 2247c684bd56c67b875b27568148966649e25fb2..ead55c09acaa58ec1314e6ba73b941959b1333e5 100644
--- a/src/66/66-tree.c
+++ b/src/66/66-tree.c
@@ -16,7 +16,7 @@
 
 #include <string.h>
 #include <sys/stat.h>
-//#include <stdio.h>
+#include <stdio.h>
 
 #include <oblibs/obgetopt.h>
 #include <oblibs/log.h>
@@ -43,7 +43,7 @@
 #include <s6-rc/s6rc-servicedir.h>
 #include <s6-rc/s6rc-constants.h>
 
-#define USAGE "66-tree [ -h ] [ -v verbosity ] [ -l ] [ -n|R ] [ -a|d ] [ -c ] [ -E|D ] [ -U ] [ -C clone ] tree" 
+#define USAGE "66-tree [ -h ] [ -v verbosity ] [ -l ] [ -n|R ] [ -a|d ] [ -c ] [ -S after_tree ] [ -E|D ] [ -U ] [ -C clone ] tree" 
 
 static stralloc reslive = STRALLOC_ZERO ;
 static char const *cleantree = 0 ;
@@ -61,6 +61,7 @@ static inline void info_help (void)
 "	-a: allow user(s) at tree\n"
 "	-d: deny user(s) at tree\n"
 "	-c: set tree as default\n"
+"	-S: start the tree after after_tree\n"  
 "	-E: enable the tree\n"
 "	-D: disable the tree\n"
 "	-R: remove the tree\n"
@@ -483,13 +484,14 @@ int main(int argc, char const *const *argv,char const *const *envp)
 	size_t duidn = 0 ;
 	uid_t duids[256] = { 0 } ;
 		
-	char const *tree = NULL ;
+	char const *tree = 0 ;
+	char const *after_tree = 0 ;
 	
 	stralloc base = STRALLOC_ZERO ;
 	stralloc dstree = STRALLOC_ZERO ;
 	stralloc clone = STRALLOC_ZERO ;
 	stralloc live = STRALLOC_ZERO ;
-	
+		
 	current = create = allow = deny = enable = disable = remove = snap = unsupervise = 0 ;
 	
 	PROG = "66-tree" ;
@@ -499,7 +501,7 @@ int main(int argc, char const *const *argv,char const *const *envp)
 		for (;;)
 		{
 			
-			int opt = getopt_args(argc,argv, "hv:l:na:d:cEDRC:U", &l) ;
+			int opt = getopt_args(argc,argv, "hv:l:na:d:cS:EDRC:U", &l) ;
 			if (opt == -1) break ;
 			if (opt == -2) log_die(LOG_EXIT_USER,"options must be set first") ;
 			switch (opt)
@@ -519,6 +521,7 @@ int main(int argc, char const *const *argv,char const *const *envp)
 						   deny = 1 ;
 						   break ;
 				case 'c' : current = 1 ; break ;
+				case 'S' : after_tree = l.arg ; break ;
 				case 'E' : enable = 1 ; if (disable) log_usage(USAGE) ; break ;
 				case 'D' : disable = 1 ; if (enable) log_usage (USAGE) ; break ;
 				case 'R' : remove = 1 ; if (create) log_usage(USAGE) ; break ;
@@ -585,7 +588,7 @@ int main(int argc, char const *const *argv,char const *const *envp)
 	{
 		log_trace("enable: ",dstree.s,"..." ) ;
 		r  = tree_cmd_state(VERBOSITY,"-a",tree) ;
-		if (!r) log_dieusys(LOG_EXIT_SYS,"add: ",dstree.s," at: ",base.s,SS_SYSTEM,SS_STATE) ;
+		if (!r) log_dieusys(LOG_EXIT_SYS,"enable: ",dstree.s," at: ",base.s,SS_SYSTEM,SS_STATE) ;
 		else if (r == 1) 
 		{
 			log_info("Enabled successfully tree: ",tree) ;
@@ -597,7 +600,7 @@ int main(int argc, char const *const *argv,char const *const *envp)
 	{
 		log_trace("disable: ",dstree.s,"..." ) ;
 		r  = tree_cmd_state(VERBOSITY,"-d",tree) ;
-		if (!r) log_dieusys(LOG_EXIT_SYS,"remove: ",dstree.s," at: ",base.s,SS_SYSTEM,SS_STATE) ;
+		if (!r) log_dieusys(LOG_EXIT_SYS,"disable: ",dstree.s," at: ",base.s,SS_SYSTEM,SS_STATE) ;
 		else if (r == 1)
 		{
 			log_info("Disabled successfully tree: ",tree) ;
@@ -665,7 +668,53 @@ int main(int argc, char const *const *argv,char const *const *envp)
 		if (!hiercopy(tmp,dstree.s)) log_dieusys(LOG_EXIT_SYS,"copy: ",dstree.s," at: ",clone.s) ;
 		log_info("Cloned successfully: ",tree," to ",clone.s) ;
 	}
+	
+	if (after_tree)
+	{
+		stralloc contents = STRALLOC_ZERO ;
+		stralloc tmp = STRALLOC_ZERO ;
+		size_t baselen = base.len, pos = 0 ;
+		char ste[baselen + SS_SYSTEM_LEN + 1] ;
+		auto_strings(ste,base.s,SS_SYSTEM) ;
+		
+		int enabled = tree_cmd_state(VERBOSITY,"-s",tree) ;
+		if (enabled != 1)
+			log_die(LOG_EXIT_USER,"tree: ",tree," is not enabled") ;
+		
+		enabled = tree_cmd_state(VERBOSITY,"-s",after_tree) ;
+		if (enabled != 1)
+			log_die(LOG_EXIT_USER,"tree: ",after_tree," is not enabled") ;
+		
+		r  = tree_cmd_state(VERBOSITY,"-d",tree) ;
+		if (!r) log_dieusys(LOG_EXIT_SYS,"disable: ",tree," at: ",ste,SS_STATE) ;
+		
+		r = file_readputsa(&tmp,ste,SS_STATE + 1) ;
+		if(!r) log_dieusys(LOG_EXIT_SYS,"open: ", ste,SS_STATE) ;
+		
+		if (!sastr_rebuild_in_oneline(&tmp) ||
+		!sastr_clean_element(&tmp))
+			log_dieusys(LOG_EXIT_SYS,"rebuilt state list") ;
+			
+		for (pos = 0 ;pos < tmp.len; pos += strlen(tmp.s + pos) + 1)
+		{
+			char *name = tmp.s + pos ;
+		
+			if (!auto_stra(&contents,name,"\n"))
+				log_dieusys(LOG_EXIT_SYS,"rebuilt state list") ;
+			
+			if (obstr_equal(name,after_tree))
+			{
+				if (!auto_stra(&contents,tree,"\n"))
+				log_dieusys(LOG_EXIT_SYS,"rebuilt state list") ;
+			}
+			
+		}
+		if (!file_write_unsafe(ste,SS_STATE + 1,contents.s,contents.len))
+			log_dieusys(LOG_EXIT_ZERO,"write: ",ste,SS_STATE) ;
+		
+	}
 	stralloc_free(&reslive) ;
+	stralloc_free(&live) ;
 	stralloc_free(&base) ;
 	stralloc_free(&dstree) ;
 	stralloc_free(&clone) ;