Changeset 2940

Timestamp:

11/17/99 18:13:38 (14 years ago)

Author:

ucacoxh

Message:

- File Window now consistent with user info and main panel.

Files:

• rat/trunk/ui_audiotool.tcl (modified) (5 diffs)

rat/trunk/ui_audiotool.tcl

@@ -751 +751 @@
 proc mbus_recv_session.title {title} {
     global session_title
-    set session_title $title
+    set session_title \"$title\"
     wm title . "RAT: $title"
 }
@@ -1661 +1661 @@
 button .prefs.buttons.bye   -text "Cancel" -command {sync_ui_to_engine; wm withdraw .prefs}
 button .prefs.buttons.apply -text "Apply" -command {wm withdraw .prefs; sync_engine_to_ui}
-#button .prefs.buttons.save  -text "Save & Apply" -command {save_settings; wm withdraw .prefs; sync_engine_to_ui}
-#pack   .prefs.buttons.bye .prefs.buttons.apply .prefs.buttons.save -side right -padx 2 -pady 2
 pack   .prefs.buttons.bye .prefs.buttons.apply -side right -padx 2 -pady 2
 
@@ -2469 +2467 @@
     toplevel .file
     wm protocol .file WM_DELETE_WINDOW {set files_on 0; file_show}
-    frame .file.play -relief ridge
-    frame .file.rec  -relief ridge
+    frame .file.play -relief groove -bd 2
+    frame .file.rec  -relief groove -bd 2
     pack  .file.play -side top -pady 2 -padx 2 -fill x -expand 1
     pack  .file.rec  -side top -pady 2 -padx 2 -fill x -expand 1
@@ -2476 +2474 @@
     label .file.play.l -text "Playback"
     pack  .file.play.l -side top -fill x
-    label .file.rec.l -text "Record"
+    label .file.rec.l -text "Record"   
     pack  .file.rec.l -side top -fill x
 
@@ -2496 +2494 @@
         }
 
-        label  .file.$action.buttons.status -text "No file selected." -relief sunk -width 16 -anchor w
+        label  .file.$action.buttons.status -text "No file selected." -width 16 -anchor w
         pack   .file.$action.buttons.status -side bottom -fill both -expand 1 -padx 2 -pady 2
     }