[prev in list] [next in list] [prev in thread] [next in thread] 

List:       squirrelmail-cvs
Subject:    [SM-CVS] SF.net SVN: squirrelmail:[14434] branches/SM-1_4-STABLE/squirrelmail
From:       pdontthink () users ! sourceforge ! net
Date:       2014-01-21 20:18:55
Message-ID: E1W5hmk-0006zc-T5 () sfs-ml-1 ! v29 ! ch3 ! sourceforge ! com
[Download RAW message or body]

Revision: 14434
          http://sourceforge.net/p/squirrelmail/code/14434
Author:   pdontthink
Date:     2014-01-21 20:18:54 +0000 (Tue, 21 Jan 2014)
Log Message:
-----------
Make configuration tool show the SquirrelMail version

Modified Paths:
--------------
    branches/SM-1_4-STABLE/squirrelmail/config/conf.pl
    branches/SM-1_4-STABLE/squirrelmail/doc/ChangeLog

Modified: branches/SM-1_4-STABLE/squirrelmail/config/conf.pl
===================================================================
--- branches/SM-1_4-STABLE/squirrelmail/config/conf.pl	2014-01-21 03:47:03 UTC (rev \
                14433)
+++ branches/SM-1_4-STABLE/squirrelmail/config/conf.pl	2014-01-21 20:18:54 UTC (rev \
14434) @@ -43,8 +43,24 @@
   
 
 ############################################################              
-# First, lets read in the data already in there...
+# Try to determine what the version of SquirrelMail is
 ############################################################              
+$sm_version = 'unknown';
+if ( -e "../functions/strings.php" && -r "../functions/strings.php") {
+    open( FILE, "../functions/strings.php" );
+    while ( $line = <FILE> ) {
+        if ($line =~ m/^\$version = '(\d+\.\d+\.\d+( ?\[\w+]|))'/) {
+            $sm_version = $1;
+            last;
+        }
+    }
+    close(FILE);
+}
+
+
+############################################################              
+# First, let's read in the data already in there...
+############################################################              
 if ( -e "config.php" ) {
     # Make sure that file is readable
     if (! -r "config.php") {
@@ -420,7 +436,7 @@
     print $WHT. "SquirrelMail Configuration : " . $NRM;
     if    ( $config == 1 ) { print "Read: config.php"; }
     elsif ( $config == 2 ) { print "Read: config_default.php"; }
-    print " ($print_config_version)\n";
+    print "\nConfig version $print_config_version; SquirrelMail version \
$sm_version\n";  print "---------------------------------------------------------\n";
 
     if ( $menu == 0 ) {

Modified: branches/SM-1_4-STABLE/squirrelmail/doc/ChangeLog
===================================================================
--- branches/SM-1_4-STABLE/squirrelmail/doc/ChangeLog	2014-01-21 03:47:03 UTC (rev \
                14433)
+++ branches/SM-1_4-STABLE/squirrelmail/doc/ChangeLog	2014-01-21 20:18:54 UTC (rev \
14434) @@ -74,6 +74,7 @@
     Williams).  See $display_imap_login_error in the configuration
     file or "4.  General Options ==> 22. Display login error from IMAP"
     in the configuration tool.
+  - Configuration tool now shows the SquirrelMail version
 
 Version 1.4.22 - 12 July 2011
 -----------------------------

This was sent by the SourceForge.net collaborative development platform, the world's \
largest Open Source development site.


------------------------------------------------------------------------------
CenturyLink Cloud: The Leader in Enterprise Cloud Services.
Learn Why More Businesses Are Choosing CenturyLink Cloud For
Critical Workloads, Development Environments & Everything In Between.
Get a Quote or Start a Free Trial Today. 
http://pubads.g.doubleclick.net/gampad/clk?id=119420431&iu=/4140/ostg.clktrk
-----
squirrelmail-cvs mailing list
List address: squirrelmail-cvs@lists.sourceforge.net
List info (subscribe/unsubscribe/change options): \
                https://lists.sourceforge.net/lists/listinfo/squirrelmail-cvs
Repository: http://squirrelmail.org/svn


[prev in list] [next in list] [prev in thread] [next in thread]