add editors.gedit
							parent
							
								
									7902334b20
								
							
						
					
					
						commit
						d3e24a7b7e
					
				| 
						 | 
				
			
			@ -0,0 +1 @@
 | 
			
		|||
Doug Coleman
 | 
			
		||||
| 
						 | 
				
			
			@ -0,0 +1,17 @@
 | 
			
		|||
! Copyright (C) 2008 Doug Coleman.
 | 
			
		||||
! See http://factorcode.org/license.txt for BSD license.
 | 
			
		||||
USING: editors io.launcher kernel make math.parser namespaces
 | 
			
		||||
sequences ;
 | 
			
		||||
IN: editors.gedit
 | 
			
		||||
 | 
			
		||||
: gedit-path ( -- path )
 | 
			
		||||
    \ gedit-path get-global [
 | 
			
		||||
        "gedit"
 | 
			
		||||
    ] unless* ;
 | 
			
		||||
 | 
			
		||||
: gedit ( file line -- )
 | 
			
		||||
    [
 | 
			
		||||
        gedit-path , number>string "+" prepend , ,
 | 
			
		||||
    ] { } make run-detached drop ;
 | 
			
		||||
 | 
			
		||||
[ gedit ] edit-hook set-global
 | 
			
		||||
| 
						 | 
				
			
			@ -0,0 +1 @@
 | 
			
		|||
gedit integration
 | 
			
		||||
| 
						 | 
				
			
			@ -0,0 +1 @@
 | 
			
		|||
unportable
 | 
			
		||||
		Loading…
	
		Reference in New Issue