[Gzz-commits] gzz Gzz.py

[Benja Fallenstein]

CVSROOT:        /cvsroot/gzz
Module name:    gzz
Changes by:     Benja Fallenstein <address@hidden>      03/01/05 06:33:08

Modified files:
        .              : Gzz.py 

Log message:
        more

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/gzz/gzz/Gzz.py.diff?tr1=1.62&tr2=1.63&r1=text&r2=text

Patches:
Index: gzz/Gzz.py
diff -u gzz/Gzz.py:1.62 gzz/Gzz.py:1.63
--- gzz/Gzz.py:1.62     Sun Jan  5 06:17:59 2003
+++ gzz/Gzz.py  Sun Jan  5 06:33:08 2003
@@ -34,9 +34,9 @@
 def call(list, type=gzz.potion.CommandCall):
     if list is None: return None
     if isinstance(list, gzz.potion.Expression): return list
+    print list
     head = list[0]
     params = [call(l, gzz.potion.FunctionCall) for l in list[1:]]
-    print head, params
     return type(head(), params)
 
 def action(list, win=1):
@@ -126,7 +126,7 @@
                                           Hop2, Put, PrefixOrRight, 
PrefixOrLeft, \
                                           RightWindow, LeftWindow, Go, Clone, \
                                            ToggleMark, Quit, ChangeView, 
ChangeDim, \
-                                           Break
+                                           Break, Delete, GoToOriginal
 
            def const(i):
                from gzz.potion.potions import ConstantExpression
@@ -142,7 +142,8 @@
                 'n': action([NewCell, None]),
                 '-': action([Connect, [PrefixOrOther], None]),
                'h': action([Hop2, None]),
-               'p': action([Put,[RightWindow],[PrefixOrLeft]]),
+               'p': action([Put,[RightWindow], [PrefixOrLeft]]),
+                'P': action([Put,[LeftWindow], [PrefixOrRight]]),
                'g': action([Go, [PrefixOrOther]], 1),
                'G': action([Go, [PrefixOrOther]], 0),
                't': action([Clone,[PrefixOrRight], None]),
@@ -157,6 +158,12 @@
                'Alt-V': action(call([ChangeView, const(-1)])),
                 'b': action(call([Break, None])),
                 'B': action(call([Break, None])),
+                'Delete': action(call([Delete, [PrefixOrRight]])),
+                'Alt-Backspace': action(call([Delete, [PrefixOrRight]])),
+                'Shift-Delete': action(call([Delete, [PrefixOrLeft]])),
+                'Alt-Shift-Delete': action(call([Delete, [PrefixOrLeft]])),
+                'o': action(call([GoToOriginal, [RightWindow]]), 1),
+                'O': action(call([GoToOriginal, [LeftWindow]]), 0),
            }
 
             self.binder = gzz.client.PotionFallbackBinder(map(bindings))