Index: modules/system/system.tokens.inc
===================================================================
RCS file: /cvs/drupal/drupal/modules/system/system.tokens.inc,v
retrieving revision 1.4
diff -u -p -r1.4 system.tokens.inc
--- modules/system/system.tokens.inc	11 Oct 2009 03:07:20 -0000	1.4
+++ modules/system/system.tokens.inc	31 Oct 2009 13:10:53 -0000
@@ -56,6 +56,10 @@ function system_token_info() {
     'name' => t("Login page"),
     'description' => t("The URL of the site's login page."),
   );
+  $site['page-number'] = array(
+    'name' => t('Page Number'),
+    'description' => t('The page number for pages that contain paged lists'),
+  );
 
   // Date related tokens.
   $date['short'] = array(
@@ -191,6 +195,11 @@ function system_tokens($type, $tokens, a
 
         case 'login-url':
           $replacements[$original] = url('user', $url_options);
+
+        case 'page-number':
+          // The page number may or may not be present. If it is, it may be comma separated values in which case grab the first.
+          $page = isset($_GET['page']) ? $_GET['page'] : '';
+          $replacements[$original] = 1 + (int)(($p = strpos($page, ',')) ? substr($page, 0, $p) : $page);
           break;
       }
     }