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

List:       kstars-devel
Subject:    [Kstars-devel] branches/kstars/summer/kdeedu/kstars/kstars/data
From:       Akarsh Simha <akarshsimha () gmail ! com>
Date:       2008-06-21 0:28:27
Message-ID: 1214008107.048641.10357.nullmailer () svn ! kde ! org
[Download RAW message or body]

SVN commit 822665 by asimha:

+ Updating binary files with the revised Tycho-1 catalog. (Thanks Jason!)

+ Made a change in tycdatatomysql.pl to adjust to the new format.

CCMAIL: kstars-devel@kde.org



 M             deepstars.dat  
 M             shallowstars.dat  
 M  +3 -3      tools/tycdatatomysql.pl  


--- branches/kstars/summer/kdeedu/kstars/kstars/data/tools/tycdatatomysql.pl #822664:822665
@@ -127,7 +127,7 @@
     chomp $line;
 
     # Column number 78 demarkates between numeric data and the genetive/long names
-    my $s1 = substr($line, 0, 78, "");
+    my $s1 = substr($line, 0, 80, "");
 
     # Comments on the File format:
     # ============================
@@ -147,11 +147,11 @@
             \s*(-?\d+\.\d\d)\s         # dRA/dt 
             \s*(-?\d+\.\d\d)\s         # dDec/dt
             \s*(-?\d+\.\d\d)\s         # Parallax
-            ([- \d]\d\.\d\d)\s         # Magnitude
+            \s([- \d]\d\.\d\d)\s       # Magnitude
             \s*([- ]\d.\d\d)\s         # B-V index
             ([01])\s                   # Multiple?
             ([01])\s                   # Variable?
-            ([A-Z ].|sd)\s             # Spectral Type
+            ([A-Z ].?|sd)\s            # Spectral Type
             }x or do 
         {
             $ERROR = "Positional Error (0-59)";
_______________________________________________
Kstars-devel mailing list
Kstars-devel@kde.org
https://mail.kde.org/mailman/listinfo/kstars-devel
[prev in list] [next in list] [prev in thread] [next in thread]