remove debug line
							parent
							
								
									1f7857035e
								
							
						
					
					
						commit
						b08e1a0205
					
				| 
						 | 
				
			
			@ -46,7 +46,6 @@ PRIVATE>
 | 
			
		|||
 | 
			
		||||
: group-name ( id -- string )
 | 
			
		||||
    dup group-cache get [
 | 
			
		||||
    "yo" print
 | 
			
		||||
        dupd at* [ name>> nip ] [ drop number>string ] if
 | 
			
		||||
    ] [
 | 
			
		||||
        group-struct [ group-gr_name ] [ f ] if*
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
		Reference in New Issue