Now should the logo for this be a slightly more babyish version of the
penguin in a nappy since we are creating new kernels 8)
Alan
---------------
diff --unified ../linux.vanilla/scripts/header.tk scripts/header.tk
--- ../linux.vanilla/scripts/header.tk Tue Jun 4 22:51:40 1996
+++ scripts/header.tk Sat Jun 8 21:00:47 1996
@@ -42,8 +42,8 @@
}
proc menu_option { w menu_num text } {
- button .f0.x$menu_num -text "$text" -width 50 -command "$w .$w \"$text\""
- pack .f0.x$menu_num -pady 1 -expand on
+ button .f0.r.x$menu_num -text "$text" -width 50 -command "$w .$w \"$text\""
+ pack .f0.r.x$menu_num -pady 1 -expand on
}
#
@@ -436,5 +436,5 @@
frame .header
label .header.label
-frame .f0
-
+frame .f0
+frame .f0.r
Only in scripts: penguin.gif
diff --unified ../linux.vanilla/scripts/tail.tk scripts/tail.tk
--- ../linux.vanilla/scripts/tail.tk Tue Jun 4 22:51:40 1996
+++ scripts/tail.tk Sat Jun 8 20:59:04 1996
@@ -1,5 +1,10 @@
pack .header -side top -padx 10 -pady 10 -expand on
+image create photo pengy
+pengy read scripts/penguin.gif
+label .f0.l -image pengy
+pack .f0.l -side left -fill y
+pack .f0.r -side right -padx 15 -pady 10 -fill y -expand on
pack .f0 -side top -padx 15 -pady 10 -fill y -expand on
#
diff --unified ../linux.vanilla/scripts/tkgen.c scripts/tkgen.c
--- ../linux.vanilla/scripts/tkgen.c Tue Jun 4 22:51:40 1996
+++ scripts/tkgen.c Sat Jun 8 20:59:46 1996
@@ -284,7 +284,7 @@
printf("} then { set %s %s } \n", item->optionname, item->value);
break;
case tok_menuoption:
- printf("} then { .f0.x%d configure -state normal } else { .f0.x%d configure -state disabled }\n",
+ printf("} then { .f0.r.x%d configure -state normal } else { .f0.l.x%d configure -state disabled }\n",
menu_num, menu_num);
break;
case tok_int:
Alan