6 files changed, 35 insertions, 3 deletions

diff --git a/kmicromail/opiemail.cpp b/kmicromail/opiemail.cpp
index c20c7ce..ec192ea 100644
--- a/kmicromail/opiemail.cpp
+++ b/kmicromail/opiemail.cpp
@@ -301,2 +301,17 @@ void OpieMail::replyMail()
 }
+void OpieMail::displayNextMail(ViewMail * vm)
+{
+    QListViewItem*item = mailView->currentItem();
+    if (!item) return;
+    item = item->itemBelow();
+    if (!item) {
+        vm->setCaption(i18n("End of List" ));
+        return;
+    }
+    mailView->setCurrentItem(item);
+    RecMailP mail = ((MailListViewItem*)item)->data();
+    RecBodyP body = folderView->fetchBody(mail);
+    vm->setBody( body );
+    vm->setMail( mail );
+}
 void OpieMail::displayMail()
@@ -315,2 +330,3 @@ void OpieMail::displayMail()
 #endif
+    connect(  &readMail,SIGNAL( showNextMail(ViewMail *)  ), this, SLOT( displayNextMail(ViewMail *) ) );
     readMail.exec();
diff --git a/kmicromail/opiemail.h b/kmicromail/opiemail.h
index 44ab1ec..30968a7 100644
--- a/kmicromail/opiemail.h
+++ b/kmicromail/opiemail.h
@@ -9,2 +9,3 @@
 #include <libmailwrapper/mailtypes.h>
+#include <viewmail.h>
 
@@ -27,2 +28,3 @@ public slots:
 protected slots:
+    virtual void displayNextMail(ViewMail * vm);
     virtual void slotSendQueued();
diff --git a/kmicromail/viewmail.cpp b/kmicromail/viewmail.cpp
index 3bd6f41..60c764c 100644
--- a/kmicromail/viewmail.cpp
+++ b/kmicromail/viewmail.cpp
@@ -328,2 +328,3 @@ ViewMail::ViewMail( QWidget *parent, const char *name, WFlags fl)
     connect( closeMail, SIGNAL( activated() ), SLOT( close() ) );
+    connect( nextMail, SIGNAL( activated() ), SLOT( slotNextMail() ) );
 
diff --git a/kmicromail/viewmail.h b/kmicromail/viewmail.h
index 194ac8e..c2c2ce3 100644
--- a/kmicromail/viewmail.h
+++ b/kmicromail/viewmail.h
@@ -44,3 +44,4 @@ public:
     bool deleted;
-
+ signals:
+    void showNextMail(ViewMail*);
 protected:
@@ -51,2 +52,3 @@ protected:
 protected slots:
+    void slotNextMail() { emit  showNextMail(this); };
     void slotReply();
diff --git a/kmicromail/viewmailbase.cpp b/kmicromail/viewmailbase.cpp
index 3d7ed42..c4731a7 100644
--- a/kmicromail/viewmailbase.cpp
+++ b/kmicromail/viewmailbase.cpp
@@ -51,4 +51,15 @@ ViewMailBase::ViewMailBase(QWidget *parent, const char *name, WFlags fl)
 	deleteMail->addTo(mailmenu);
-  	closeMail = new QAction(i18n("Close"),SmallIcon("exit"), 0, 0, this);
+
+
+
+    nextMail = new QAction(i18n("Show next mail"),SmallIcon("add"), 0, 0, this);
 	QLabel *spacer = new QLabel(toolbar);
+	nextMail->addTo(toolbar);
+	nextMail->addTo(mailmenu);
+
+
+
+
+  	closeMail = new QAction(i18n("Close"),SmallIcon("exit"), 0, 0, this);
+	//QLabel *spacer = new QLabel(toolbar);
 	spacer->setBackgroundMode(QWidget::PaletteButton);
diff --git a/kmicromail/viewmailbase.h b/kmicromail/viewmailbase.h
index 1c8948a..c97e9e3 100644
--- a/kmicromail/viewmailbase.h
+++ b/kmicromail/viewmailbase.h
@@ -22,3 +22,3 @@ public:
 protected:
-	QAction *reply, *forward, *attachbutton, *deleteMail, *showHtml, *closeMail;
+	QAction *reply, *forward, *attachbutton, *deleteMail, *showHtml, *closeMail, *nextMail;
 	QListView *attachments;