X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?p=chiark-tcl-applet.git;a=blobdiff_plain;f=args.tcl;h=c81118cbf091cede93aef94ff5d4365d59842fd0;hp=248548bcaad267bbb9ff286856bd7ff3638955f2;hb=a28043c357ce68cd1d1dd17abc81e39cc7f7b84a;hpb=2ad3f13ef50c105ebedbaff56992df7b23c0136c diff --git a/args.tcl b/args.tcl index 248548b..c81118c 100644 --- a/args.tcl +++ b/args.tcl @@ -35,7 +35,7 @@ proc generalarg {arg} { -horizontal - -vertical { set applet::deforient $arg } -borderColour - -borderColor { set applet::border_colour [next] } -borderWidth { set applet::border_width [next_num] } - -debug { applet::setup-debug puts } + -debug { debug::setup puts } default { return 0 } } return 1