Update about data

And fix it for a perl build script...

2 files changed, 11 insertions, 2 deletions

diff --git a/main.cpp b/main.cpp
index 005af7f..e7d3f81 100644
--- a/main.cpp
+++ b/main.cpp
@@ -5,8 +5,9 @@
 int main(int argc, char *argv[]){
     QApplication a(argc, argv);
     QCoreApplication::setOrganizationName("Sissie's, Inc.");
-    QCoreApplication::setOrganizationDomain("dakara.d-tor.org");
+    QCoreApplication::setOrganizationDomain("tollana.d-tor.org");
     QCoreApplication::setApplicationName("ShemovCleaner");
+    QCoreApplication::setApplicationVersion("1.0 (__build_info__)");
     ShemovCleaner w;
     w.show();
     return a.exec();
diff --git a/shemovcleaner.cpp b/shemovcleaner.cpp
index bb22e24..171d689 100644
--- a/shemovcleaner.cpp
+++ b/shemovcleaner.cpp
@@ -192,7 +192,15 @@ void ShemovCleaner::writeSettings(){
 }
 
 void ShemovCleaner::aboutThisProgram(){
-    QMessageBox::about(this, tr("About ShemovCleaner"), tr("A little helper program for the big sister SheMov"));
+    QString aboutLabel = QString(tr("About %1")).arg(qApp->applicationName());
+    QString aboutText = QString("<p>%1 - A little helper program for the big sister SheMov</p>").arg(qApp->applicationName());
+    aboutText.append("<table>");
+    aboutText.append(QString(tr("<tr><td>Author<td></td>Sissy herself %1</td></tr>")).arg(QChar(0x26A4)));
+    aboutText.append(QString(tr("<tr><td>Organization</td><td>%1</td></tr>")).arg(qApp->organizationName()));
+    aboutText.append(QString(tr("<tr><td>Version</td><td>%1</td></tr>")).arg(qApp->applicationVersion()));
+    aboutText.append(QString(tr("<tr><td>Build:</td><td>/* __debug build__ */</td></tr>")));
+    aboutText.append(tr("<tr><td>Depends</td><td>Qt</td></tr></table>"));
+    QMessageBox::about(this, aboutLabel, aboutText);
 }
 
 QAction *ShemovCleaner::createSeparator(){