### Eclipse Workspace Patch 1.0
#P mimemail
Index: mimemail.inc
===================================================================
RCS file: /cvs/drupal-contrib/contributions/modules/mimemail/mimemail.inc,v
retrieving revision 1.53
diff -u -r1.53 mimemail.inc
--- mimemail.inc	12 Sep 2010 15:57:20 -0000	1.53
+++ mimemail.inc	29 Sep 2010 11:49:40 -0000
@@ -549,9 +549,24 @@
     return '#'. $fragment;
   }
 
-  // If we have not yet returned, then let's clean things up and leave.
-  $url = url($path, array('query' => $query, 'fragment' => $fragment, 'absolute' => TRUE));
+  // Get a list of enabled languages.
+  $languages = language_list('enabled');
+  $languages = $languages[1];
+
+  // Check language prefix.
+  $prefix = '';
+  $args = explode('/', $path);
+  foreach (array_keys($languages) as $lang) {
+    if ($args[0] == $lang) {
+      $prefix = array_shift($args) .'/';
+      $language = $languages[$lang];
+      $path = implode('/', $args);
+      break;
+    }
+  }
 
+  // If we have not yet returned, then let's clean things up and leave.
+  $url = url($path, array('query' => $query, 'fragment' => $fragment, 'absolute' => TRUE, 'language' => $language, 'prefix' => $prefix));
 
   // If url() added a ?q= where there should not be one, remove it.
   if ($strip_clean) $url = preg_replace('!\?q=!', '', $url);