=== modified file 'src/defines.h'
--- src/defines.h	
+++ src/defines.h	
@@ -2421,7 +2421,7 @@
 #define OPT_disturb_panel			22
 #define OPT_disturb_state			23
 #define OPT_disturb_minor			24
-/* xxx OPT_disturb_other */
+#define OPT_next_xp					25
 /* xxx OPT_alert_hitpoint */
 /* xxx OPT_alert_failure */
 #define OPT_verify_destroy			28
@@ -2541,7 +2541,7 @@
 #define disturb_panel			op_ptr->opt[OPT_disturb_panel]
 #define disturb_state			op_ptr->opt[OPT_disturb_state]
 #define disturb_minor			op_ptr->opt[OPT_disturb_minor]
-/* xxx disturb_other */
+#define next_xp					op_ptr->opt[OPT_next_xp]
 /* xxx */
 /* xxx alert_failure */
 #define verify_destroy			op_ptr->opt[OPT_verify_destroy]

=== modified file 'src/tables.c'
--- src/tables.c	
+++ src/tables.c	
@@ -1421,7 +1421,7 @@
 	"disturb_panel",			/* OPT_disturb_panel */
 	"disturb_state",			/* OPT_disturb_state */
 	"disturb_minor",			/* OPT_disturb_minor */
-	NULL,						/* xxx disturb_other */
+	"next_xp",					/* OPT_next_xp */
 	NULL,						/* xxx alert_hitpoint */
 	NULL,						/* xxx alert_failure */
 	"verify_destroy",			/* OPT_verify_destroy */
@@ -1685,7 +1685,7 @@
 	"Disturb whenever map panel changes",		/* OPT_disturb_panel */
 	"Disturb whenever player state changes",	/* OPT_disturb_state */
 	"Disturb whenever boring things happen",	/* OPT_disturb_minor */
-	NULL,										/* xxx disturb_other */
+	"Display XP to next level on main panel",			/* OPT_next_xp */
 	NULL,										/* xxx alert_hitpoint */
 	NULL,										/* xxx alert_failure */
 	"Verify destruction of objects",			/* OPT_verify_destroy */
@@ -1949,7 +1949,7 @@
 	TRUE,		/* OPT_disturb_panel */
 	TRUE,		/* OPT_disturb_state */
 	TRUE,		/* OPT_disturb_minor */
-	FALSE,		/* xxx disturb_other */
+	TRUE,		/* OPT_next_xp */
 	FALSE,		/* xxx alert_hitpoint */
 	FALSE,		/* xxx alert_failure */
 	TRUE,		/* OPT_verify_destroy */
@@ -2204,7 +2204,7 @@
 		OPT_easy_open,
 		OPT_easy_alter,
 		OPT_easy_floor,
-		OPT_NONE,
+		OPT_next_xp,
 		OPT_NONE,
 		OPT_NONE,
 		OPT_NONE,

=== modified file 'src/xtra1.c'
--- src/xtra1.c	
+++ src/xtra1.c	
@@ -199,7 +199,8 @@
 {
 	char out_val[32];
 
-	sprintf(out_val, "%8ld", (long)p_ptr->exp);
+	if (next_xp) sprintf(out_val, "%8ld", (long)p_ptr->exp);
+	else sprintf(out_val, "%8ld", (long)(player_exp[p_ptr->lev - 1] * p_ptr->expfact / 100L) - p_ptr->exp);
 
 	if (p_ptr->exp >= p_ptr->max_exp)
 	{


