pack-all-in-one.kvs

   1 # Pack all themes in a single package
   2
   3 # The output path
   4 %szPackagePath = $file.homedir(KVIrc-Giant-Theme-Pack-1.0.0.kvt)
   5 # The name of the package
   6 %szPackageName = "KVIrc Giant Theme Pack"
   7 # The version of the package
   8 %szPackageVersion = "1.0.0"
   9 # The description of the themes package
  10 %szPackageDescription = "A big fat pack of themes"
  11 # The author
  12 %szPackageAuthor = "Szymon Tomasz Stefanek"
  13 # You can put a path to an image here, it will be used as package presentation image
  14 %szPackageImage = ""
  15
  16 ################################################################################################
  17
  18 %dir = $file.extractPath($0)
  19
  20 echo "Packing all themes in directory %dir"
  21
  22 %aDirs = $file.ls(%dir,d)
  23
  24 %aPaths = $array()
  25
  26 foreach(%d,%aDirs)
  27 {
  28         if(%d == "." || %d == "..")
  29                 continue;
  30
  31         echo "Theme directory %d"
  32
  33         %inf = $theme.info(%dir/%d);
  34
  35         if(%inf{"name"} == "")
  36                 continue;
  37         if(%inf{"version"} == "")
  38                 continue;
  39
  40         echo "Theme name is "%inf{"name"}
  41         echo "Theme version is "%inf{"version"}
  42
  43         %aPaths <+ %dir/%d
  44 }
  45
  46 theme.pack \
  47         %szPackagePath \
  48         %szPackageName \
  49         %szPackageVersion \
  50         %szPackageDescription \
  51         %szPackageAuthor \
  52         %szPackageImage \
  53         %aPaths
  54