home *** CD-ROM | disk | FTP | other *** search
/ PC World 2005 June / PCWorld_2005-06_cd.bin / software / vyzkuste / firewally / firewally.exe / framework-2.3.exe / bugreport.vim < prev    next >
Text File  |  2003-08-12  |  2KB  |  87 lines
  1. :" Use this script to create the file "bugreport.txt", which contains
  2. :" information about the environment of a possible bug in Vim.
  3. :"
  4. :" Maintainer:    Bram Moolenaar <Bram@vim.org>
  5. :" Last change:    2001 Feb 02
  6. :"
  7. :" To use inside Vim:
  8. :"    :so $VIMRUNTIME/bugreport.vim
  9. :" Or, from the command line:
  10. :"    vim -s $VIMRUNTIME/bugreport.vim
  11. :"
  12. :" The "if 1" lines are to avoid error messages when expression evaluation is
  13. :" not compiled in.
  14. :"
  15. :if 1
  16. :  let more_save = &more
  17. :endif
  18. :set nomore
  19. :if has("unix")
  20. :  !echo "uname -a" >bugreport.txt
  21. :  !uname -a >>bugreport.txt
  22. :endif
  23. :redir >>bugreport.txt
  24. :version
  25. :if 1
  26. :  func <SID>CheckDir(n)
  27. :    if isdirectory(a:n)
  28. :      echo 'directory "' . a:n . '" exists'
  29. :    else
  30. :      echo 'directory "' . a:n . '" does NOT exist'
  31. :    endif
  32. :  endfun
  33. :  func <SID>CheckFile(n)
  34. :    if filereadable(a:n)
  35. :      echo '"' . a:n . '" is readable'
  36. :    else
  37. :      echo '"' . a:n . '" is NOT readable'
  38. :    endif
  39. :  endfun
  40. :  echo "--- Directories and Files ---"
  41. :  echo '$VIM = "' . $VIM . '"'
  42. :  call <SID>CheckDir($VIM)
  43. :  echo '$VIMRUNTIME = "' . $VIMRUNTIME . '"'
  44. :  call <SID>CheckDir($VIMRUNTIME)
  45. :  call <SID>CheckFile(&helpfile)
  46. :  call <SID>CheckFile(fnamemodify(&helpfile, ":h") . "/tags")
  47. :  call <SID>CheckFile($VIMRUNTIME . "/menu.vim")
  48. :  call <SID>CheckFile($VIMRUNTIME . "/filetype.vim")
  49. :  call <SID>CheckFile($VIMRUNTIME . "/syntax/synload.vim")
  50. :  delfun <SID>CheckDir
  51. :  delfun <SID>CheckFile
  52. :endif
  53. :set all
  54. :set termcap
  55. :if has("autocmd")
  56. :  au
  57. :endif
  58. :if 1
  59. :  echo "--- Normal/Visual mode mappings ---"
  60. :endif
  61. :map
  62. :if 1
  63. :  echo "--- Insert/Command-line mode mappings ---"
  64. :endif
  65. :map!
  66. :if 1
  67. :  echo "--- Abbreviations ---"
  68. :endif
  69. :ab
  70. :if 1
  71. :  echo "--- Highlighting ---"
  72. :endif
  73. :highlight
  74. :if 1
  75. :  echo "--- Variables ---"
  76. :endif
  77. :if 1
  78. :  let
  79. :endif
  80. :redir END
  81. :set more&
  82. :if 1
  83. :  let &more = more_save
  84. :  unlet more_save
  85. :endif
  86. :e bugreport.txt
  87.