1. #!/usr/bin/tclsh
  2. #
  3. # ps3mfw -- PS3 MFW creator
  4. #
  5. # Copyright (C) Anonymous Developers (Code Monkeys)
  6. #
  7. # This software is distributed under the terms of the GNU General Public
  8. # License ("GPL") version 3, as published by the Free Software Foundation.
  9. #
  10. # Priority: 500
  11. # Description: Patch Alphabetical sort Order
  12. # Option --patch-alpha-sort: Alphabetical sort Order for Games in the XMB
  13. # Type --patch-alpha-sort: boolean
  14. namespace eval ::patch_registory {
  15. array set ::patch_registory::options {
  16. --patch-alpha-sort true
  17. }
  18. proc main {} {
  19. set REGISTORY_XML [file join dev_flash vsh resource explore xmb registory.xml]
  20. ::modify_devflash_file ${REGISTORY_XML} ::patch_registory::sort
  21. }
  22. proc sort { path args } {
  23. log "Patching XML file [file tail $path]"
  24. sed_in_place [file join $path] -Game:Common.stat.rating-Game:Common.timeCreated+Game:Common.titleForSort-Game:Game.category -Game:Common.stat.rating-Game:Common.titleForSort-Game:Common.title-Game:Game.category
  25. sed_in_place [file join $path] -Game:Common.stat.rating+Game:Common.timeCreated+Game:Common.titleForSort-Game:Game.category -Game:Common.stat.rating+Game:Common.titleForSort-Game:Common.title-Game:Game.category
  26. sed_in_place [file join $path] -Game:Common.stat.rating+Game:Common.titleForSort-Game:Common.timeCreated-Game:Game.category -Game:Common.stat.rating+Game:Common.titleForSort-Game:Common.title-Game:Game.category
  27. }
  28. }

patch_registory.tcl

Comments powered by Disqus