Index: gtk/gtkaccellabel.c
===================================================================
RCS file: /cvs/gnome/gtk+/gtk/gtkaccellabel.c,v
retrieving revision 1.48
diff -u -b -B -p -r1.48 gtkaccellabel.c
--- gtk/gtkaccellabel.c	18 Oct 2002 19:26:42 -0000	1.48
+++ gtk/gtkaccellabel.c	25 Oct 2002 00:03:13 -0000
@@ -312,6 +312,9 @@ gtk_accel_label_expose_event (GtkWidget 
 {
   GtkAccelLabel *accel_label = GTK_ACCEL_LABEL (widget);
   GtkMisc *misc = GTK_MISC (accel_label);
+  GtkTextDirection direction;
+
+  direction = gtk_widget_get_direction (widget);
 	  
   if (GTK_WIDGET_DRAWABLE (accel_label))
     {
@@ -327,11 +330,18 @@ gtk_accel_label_expose_event (GtkWidget 
 	  gint x;
 	  gint y;
 	  
+	  if (direction == GTK_TEXT_DIR_RTL)
+	    widget->allocation.x += ac_width;
 	  widget->allocation.width -= ac_width;
 	  if (GTK_WIDGET_CLASS (parent_class)->expose_event)
 	    GTK_WIDGET_CLASS (parent_class)->expose_event (widget, event);
+	  if (direction == GTK_TEXT_DIR_RTL)
+	    widget->allocation.x -= ac_width;
 	  widget->allocation.width += ac_width;
 	  
+	  if (direction == GTK_TEXT_DIR_RTL)
+	    x = widget->allocation.x + misc->xpad;
+	  else
 	  x = widget->allocation.x + widget->allocation.width - misc->xpad - ac_width;
 
 	  label_layout = gtk_label_get_layout (GTK_LABEL (accel_label));
