diff --git a/src/qtgui/main.cpp b/src/qtgui/main.cpp
index 97781dce..7734bdff 100644
--- a/src/qtgui/main.cpp
+++ b/src/qtgui/main.cpp
@@ -1,10 +1,14 @@
 #ifndef lint
-static char rcsid[] = "@(#$Id: main.cpp,v 1.10 2005-10-19 10:21:48 dockes Exp $ (C) 2005 J.F.Dockes";
+static char rcsid[] = "@(#$Id: main.cpp,v 1.11 2005-10-22 05:35:16 dockes Exp $ (C) 2005 J.F.Dockes";
 #endif
 
 #include <unistd.h>
 
 #include <qapplication.h>
+
+#include <qtranslator.h>
+#include <qtextcodec.h> 
+
 #include <qthread.h>
 #include <qtimer.h>
 
@@ -81,10 +85,15 @@ static void sigcleanup(int)
     recollNeedsExit = 1;
 }
 
-
 int main( int argc, char ** argv )
 {
     QApplication a(argc, argv);
+
+    QTranslator translator( 0 );
+    // QTextCodec::locale() return $LANG
+    translator.load( QString("recoll_") + QTextCodec::locale(), "." );
+    a.installTranslator( &translator );
+    
     RecollMain w;
     w.show();
     a.connect(&a, SIGNAL(lastWindowClosed()), &a, SLOT(quit()));
diff --git a/src/qtgui/recoll.pro b/src/qtgui/recoll.pro
index f55e2ab2..558d47bd 100644
--- a/src/qtgui/recoll.pro
+++ b/src/qtgui/recoll.pro
@@ -38,3 +38,4 @@ contains( UNAME, [lL]inux ) {
           LIBS -= -liconv
 }
 
+TRANSLATIONS = recoll_fr.ts
diff --git a/src/qtgui/recoll_fr.ts b/src/qtgui/recoll_fr.ts
new file mode 100644
index 00000000..01eee1f5
--- /dev/null
+++ b/src/qtgui/recoll_fr.ts
@@ -0,0 +1,155 @@
+<!DOCTYPE TS><TS>
+<context>
+    <name>Preview</name>
+    <message>
+        <source>Preview</source>
+        <translation>Previsualisation</translation>
+    </message>
+    <message>
+        <source>Preview 1</source>
+        <translation>Previsualisation 1</translation>
+    </message>
+    <message>
+        <source>&amp;Search for:</source>
+        <translation>&amp;Rechercher:</translation>
+    </message>
+    <message>
+        <source>&amp;Next</source>
+        <translation>&amp;Suivant</translation>
+    </message>
+    <message>
+        <source>Alt+N</source>
+        <translation>Alt+S</translation>
+    </message>
+    <message>
+        <source>&amp;Previous</source>
+        <translation>&amp;Precédent</translation>
+    </message>
+    <message>
+        <source>Alt+P</source>
+        <translation>Alt+P</translation>
+    </message>
+    <message>
+        <source>Match &amp;Case</source>
+        <translation>Respecter la &amp;casse</translation>
+    </message>
+    <message>
+        <source>Alt+C</source>
+        <translation>Alt+C</translation>
+    </message>
+    <message>
+        <source>Close Tab</source>
+        <translation>Fermer la tabulation</translation>
+    </message>
+</context>
+<context>
+    <name>RecollMain</name>
+    <message>
+        <source>recoll</source>
+        <translation>recoll</translation>
+    </message>
+    <message>
+        <source>Search</source>
+        <translation>Rechercher</translation>
+    </message>
+    <message>
+        <source>Clear</source>
+        <translation>Effacer</translation>
+    </message>
+    <message>
+        <source>Ctrl+S</source>
+        <translation>Ctrl+S</translation>
+    </message>
+    <message>
+        <source>Previous page</source>
+        <translation>Page précedente</translation>
+    </message>
+    <message>
+        <source>Next page</source>
+        <translation>Page suivante</translation>
+    </message>
+    <message>
+        <source>Advanced search</source>
+        <translation>Recherche avancée</translation>
+    </message>
+    <message>
+        <source>&amp;File</source>
+        <translation>&amp;Fichier</translation>
+    </message>
+    <message>
+        <source>Exit</source>
+        <translation>Quitter</translation>
+    </message>
+    <message>
+        <source>E&amp;xit</source>
+        <translation>&amp;Quitter</translation>
+    </message>
+    <message>
+        <source>Start Indexing</source>
+        <translation>Commencer l&apos;indexation</translation>
+    </message>
+</context>
+<context>
+    <name>advsearch</name>
+    <message>
+        <source>Advanced search</source>
+        <translation>Recherche avancée</translation>
+    </message>
+    <message>
+        <source>Search For</source>
+        <translation>Rechercher</translation>
+    </message>
+    <message>
+        <source>All these words</source>
+        <translation>Tous les mots</translation>
+    </message>
+    <message>
+        <source>This exact phrase</source>
+        <translation>Cette phrase exactement</translation>
+    </message>
+    <message>
+        <source>Any of these words</source>
+        <translation>N&apos;importe lequel de ces mots</translation>
+    </message>
+    <message>
+        <source>None of these words</source>
+        <translation>Aucun parmi ces mots</translation>
+    </message>
+    <message>
+        <source>Restrict file types</source>
+        <translation>Restraindre le type de fichier</translation>
+    </message>
+    <message>
+        <source>Searched file types</source>
+        <translation>Type de fichier recherché</translation>
+    </message>
+    <message>
+        <source>--------&gt;</source>
+        <translation>--------&gt;</translation>
+    </message>
+    <message>
+        <source>&lt;---------</source>
+        <translation>&lt;---------</translation>
+    </message>
+    <message>
+        <source>Ignored file types</source>
+        <translation>Types de fichier ignorés</translation>
+    </message>
+    <message>
+        <source>Browse</source>
+        <translation>ButinerParcourir</translation>
+    </message>
+    <message>
+        <source>Restrict results to files in subtree:</source>
+        <translation>Restraindre les résultats aux fichiers de l&apos;arborescenc:</translation>
+    </message>
+    <message>
+        <source>Start Search</source>
+        <translation>Lancer la recherche</translation>
+    </message>
+    <message>
+        <source>Dismiss</source>
+        <translation>Annuler</translation>
+    </message>
+</context>
+</TS>