runtime/syntax/slrnrc.vim

   1 " Vim syntax file
   2 " Language:     Slrn setup file (based on slrn 0.9.8.1)
   3 " Maintainer:   Preben 'Peppe' Guldberg <peppe-vim@wielders.org>
   4 " Last Change:  23 April 2006
   5
   6 " For version 5.x: Clear all syntax items
   7 " For version 6.x: Quit when a syntax file was already loaded
   8 if version < 600
   9   syntax clear
  10 elseif exists("b:current_syntax")
  11   finish
  12 endif
  13
  14 syn keyword slrnrcTodo          contained Todo
  15
  16 " In some places whitespace is illegal
  17 syn match slrnrcSpaceError      contained "\s"
  18
  19 syn match slrnrcNumber          contained "-\=\<\d\+\>"
  20 syn match slrnrcNumber          contained +'[^']\+'+
  21
  22 syn match slrnrcSpecKey         contained +\(\\[er"']\|\^[^'"]\|\\\o\o\o\)+
  23
  24 syn match  slrnrcKey            contained "\S\+"        contains=slrnrcSpecKey
  25 syn region slrnrcKey            contained start=+"+ skip=+\\"+ end=+"+ oneline contains=slrnrcSpecKey
  26 syn region slrnrcKey            contained start=+'+ skip=+\\'+ end=+'+ oneline contains=slrnrcSpecKey
  27
  28 syn match slrnrcSpecChar        contained +'+
  29 syn match slrnrcSpecChar        contained +\\[n"]+
  30 syn match slrnrcSpecChar        contained "%[dfmnrs%]"
  31
  32 syn match  slrnrcString         contained /[^ \t%"']\+/ contains=slrnrcSpecChar
  33 syn region slrnrcString         contained start=+"+ skip=+\\"+ end=+"+ oneline contains=slrnrcSpecChar
  34
  35 syn match slrnSlangPreCondit    "^#\s*ifn\=\(def\>\|false\>\|true\>\|\$\)"
  36 syn match slrnSlangPreCondit    "^#\s*e\(lif\|lse\|ndif\)\>"
  37
  38 syn match slrnrcComment         "%.*$"  contains=slrnrcTodo
  39
  40 syn keyword  slrnrcVarInt       contained abort_unmodified_edits article_window_page_overlap auto_mark_article_as_read beep broken_xref broken_xref cc_followup check_new_groups
  41 syn keyword  slrnrcVarInt       contained color_by_score confirm_actions custom_sort_by_threads display_cursor_bar drop_bogus_groups editor_uses_mime_charset emphasized_text_mask
  42 syn keyword  slrnrcVarInt       contained emphasized_text_mode fold_headers fold_headers followup_strip_signature force_authentication force_authentication generate_date_header
  43 syn keyword  slrnrcVarInt       contained generate_email_from generate_email_from generate_message_id grouplens_port hide_pgpsignature hide_quotes hide_signature
  44 syn keyword  slrnrcVarInt       contained hide_verbatim_marks hide_verbatim_text highlight_unread_subjects highlight_urls ignore_signature kill_score lines_per_update
  45 syn keyword  slrnrcVarInt       contained mail_editor_is_mua max_low_score max_queued_groups min_high_score mouse netiquette_warnings new_subject_breaks_threads no_autosave
  46 syn keyword  slrnrcVarInt       contained no_backups prefer_head process_verbatim_marks query_next_article query_next_group query_read_group_cutoff read_active reject_long_lines
  47 syn keyword  slrnrcVarInt       contained scroll_by_page show_article show_thread_subject simulate_graphic_chars smart_quote sorting_method spoiler_char spoiler_char
  48 syn keyword  slrnrcVarInt       contained spoiler_display_mode spoiler_display_mode spool_check_up_on_nov spool_check_up_on_nov uncollapse_threads unsubscribe_new_groups use_blink
  49 syn keyword  slrnrcVarInt       contained use_color use_flow_control use_grouplens use_grouplens use_header_numbers use_inews use_inews use_localtime use_metamail use_mime use_mime
  50 syn keyword  slrnrcVarInt       contained use_recommended_msg_id use_slrnpull use_slrnpull use_tilde use_tmpdir use_uudeview use_uudeview warn_followup_to wrap_flags wrap_method
  51 syn keyword  slrnrcVarInt       contained write_newsrc_flags
  52
  53 " Listed for removal
  54 syn keyword  slrnrcVarInt       contained author_display display_author_realname display_score group_dsc_start_column process_verbatum_marks prompt_next_group query_reconnect
  55 syn keyword  slrnrcVarInt       contained show_descriptions use_xgtitle
  56
  57 " Match as a "string" too
  58 syn region  slrnrcVarIntStr     contained matchgroup=slrnrcVarInt start=+"+ end=+"+ oneline contains=slrnrcVarInt,slrnrcSpaceError
  59
  60 syn keyword slrnrcVarStr        contained Xbrowser art_help_line art_status_line cansecret_file cc_post_string charset custom_headers custom_sort_order decode_directory
  61 syn keyword slrnrcVarStr        contained editor_command failed_posts_file followup_custom_headers followup_date_format followup_string followupto_string group_help_line
  62 syn keyword slrnrcVarStr        contained group_status_line grouplens_host grouplens_pseudoname header_help_line header_status_line hostname inews_program macro_directory
  63 syn keyword slrnrcVarStr        contained mail_editor_command metamail_command mime_charset non_Xbrowser organization overview_date_format post_editor_command post_object
  64 syn keyword slrnrcVarStr        contained postpone_directory printer_name quote_string realname reply_custom_headers reply_string replyto save_directory save_posts save_replies
  65 syn keyword slrnrcVarStr        contained score_editor_command scorefile sendmail_command server_object signature signoff_string spool_active_file spool_activetimes_file
  66 syn keyword slrnrcVarStr        contained spool_inn_root spool_newsgroups_file spool_nov_file spool_nov_root spool_overviewfmt_file spool_root supersedes_custom_headers
  67 syn keyword slrnrcVarStr        contained top_status_line username
  68
  69 " Listed for removal
  70 syn keyword slrnrcVarStr        contained followup cc_followup_string
  71
  72 " Match as a "string" too
  73 syn region  slrnrcVarStrStr     contained matchgroup=slrnrcVarStr start=+"+ end=+"+ oneline contains=slrnrcVarStr,slrnrcSpaceError
  74
  75 " Various commands
  76 syn region slrnrcCmdLine        matchgroup=slrnrcCmd start="\<\(autobaud\|color\|compatible_charsets\|group_display_format\|grouplens_add\|header_display_format\|ignore_quotes\|include\|interpret\|mono\|nnrpaccess\|posting_host\|server\|set\|setkey\|strip_re_regexp\|strip_sig_regexp\|strip_was_regexp\|unsetkey\|visible_headers\)\>" end="$" oneline contains=slrnrc\(String\|Comment\)
  77
  78 " Listed for removal
  79 syn region slrnrcCmdLine        matchgroup=slrnrcCmd start="\<\(cc_followup_string\|decode_directory\|editor_command\|followup\|hostname\|organization\|quote_string\|realname\|replyto\|scorefile\|signature\|username\)\>" end="$" oneline contains=slrnrc\(String\|Comment\)
  80
  81 " Setting variables
  82 syn keyword slrnrcSet           contained set
  83 syn match   slrnrcSetStr        "^\s*set\s\+\S\+" skipwhite nextgroup=slrnrcString contains=slrnrcSet,slrnrcVarStr\(Str\)\=
  84 syn match   slrnrcSetInt        contained "^\s*set\s\+\S\+" contains=slrnrcSet,slrnrcVarInt\(Str\)\=
  85 syn match   slrnrcSetIntLine    "^\s*set\s\+\S\+\s\+\(-\=\d\+\>\|'[^']\+'\)" contains=slrnrcSetInt,slrnrcNumber,slrnrcVarInt
  86
  87 " Color definitions
  88 syn match   slrnrcColorObj      contained "\<quotes\d\+\>"
  89 syn keyword slrnrcColorObj      contained article author boldtext box cursor date description error frame from_myself group grouplens_display header_name header_number headers
  90 syn keyword slrnrcColorObj      contained high_score italicstext menu menu_press message neg_score normal pgpsignature pos_score quotes response_char selection signature status
  91 syn keyword slrnrcColorObj      contained subject thread_number tilde tree underlinetext unread_subject url verbatim
  92
  93 " Listed for removal
  94 syn keyword slrnrcColorObj      contained verbatum
  95
  96 syn region  slrnrcColorObjStr   contained matchgroup=slrnrcColorObj start=+"+ end=+"+ oneline contains=slrnrcColorObj,slrnrcSpaceError
  97 syn keyword slrnrcColorVal      contained default
  98 syn keyword slrnrcColorVal      contained black blue brightblue brightcyan brightgreen brightmagenta brightred brown cyan gray green lightgray magenta red white yellow
  99 syn region  slrnrcColorValStr   contained matchgroup=slrnrcColorVal start=+"+ end=+"+ oneline contains=slrnrcColorVal,slrnrcSpaceError
 100 " Mathcing a function with three arguments
 101 syn keyword slrnrcColor         contained color
 102 syn match   slrnrcColorInit     contained "^\s*color\s\+\S\+" skipwhite nextgroup=slrnrcColorVal\(Str\)\= contains=slrnrcColor\(Obj\|ObjStr\)\=
 103 syn match   slrnrcColorLine     "^\s*color\s\+\S\+\s\+\S\+" skipwhite nextgroup=slrnrcColorVal\(Str\)\= contains=slrnrcColor\(Init\|Val\|ValStr\)
 104
 105 " Mono settings
 106 syn keyword slrnrcMonoVal       contained blink bold none reverse underline
 107 syn region  slrnrcMonoValStr    contained matchgroup=slrnrcMonoVal start=+"+ end=+"+ oneline contains=slrnrcMonoVal,slrnrcSpaceError
 108 " Color object is inherited
 109 " Mono needs at least one argument
 110 syn keyword slrnrcMono          contained mono
 111 syn match   slrnrcMonoInit      contained "^\s*mono\s\+\S\+" contains=slrnrcMono,slrnrcColorObj\(Str\)\=
 112 syn match   slrnrcMonoLine      "^\s*mono\s\+\S\+\s\+\S.*" contains=slrnrcMono\(Init\|Val\|ValStr\),slrnrcComment
 113
 114 " Functions in article mode
 115 syn keyword slrnrcFunArt        contained article_bob article_eob article_left article_line_down article_line_up article_page_down article_page_up article_right article_search
 116 syn keyword slrnrcFunArt        contained author_search_backward author_search_forward browse_url cancel catchup catchup_all create_score decode delete delete_thread digit_arg
 117 syn keyword slrnrcFunArt        contained enlarge_article_window evaluate_cmd exchange_mark expunge fast_quit followup forward forward_digest get_children_headers get_parent_header
 118 syn keyword slrnrcFunArt        contained goto_article goto_last_read grouplens_rate_article header_bob header_eob header_line_down header_line_up header_page_down header_page_up
 119 syn keyword slrnrcFunArt        contained help hide_article locate_article mark_spot next next_high_score next_same_subject pipe post post_postponed previous print quit redraw
 120 syn keyword slrnrcFunArt        contained repeat_last_key reply request save show_spoilers shrink_article_window skip_quotes skip_to_next_group skip_to_previous_group
 121 syn keyword slrnrcFunArt        contained subject_search_backward subject_search_forward supersede suspend tag_header toggle_collapse_threads toggle_header_formats
 122 syn keyword slrnrcFunArt        contained toggle_header_tag toggle_headers toggle_pgpsignature toggle_quotes toggle_rot13 toggle_signature toggle_sort toggle_verbatim_marks
 123 syn keyword slrnrcFunArt        contained toggle_verbatim_text uncatchup uncatchup_all undelete untag_headers view_scores wrap_article zoom_article_window
 124
 125 " Listed for removal
 126 syn keyword slrnrcFunArt        contained art_bob art_eob art_xpunge article_linedn article_lineup article_pagedn article_pageup down enlarge_window goto_beginning goto_end left
 127 syn keyword slrnrcFunArt        contained locate_header_by_msgid pagedn pageup pipe_article prev print_article right scroll_dn scroll_up shrink_window skip_to_prev_group
 128 syn keyword slrnrcFunArt        contained toggle_show_author up
 129
 130 " Functions in group mode
 131 syn keyword slrnrcFunGroup      contained add_group bob catchup digit_arg eob evaluate_cmd group_search group_search_backward group_search_forward help line_down line_up move_group
 132 syn keyword slrnrcFunGroup      contained page_down page_up post post_postponed quit redraw refresh_groups repeat_last_key save_newsrc select_group subscribe suspend
 133 syn keyword slrnrcFunGroup      contained toggle_group_formats toggle_hidden toggle_list_all toggle_scoring transpose_groups uncatchup unsubscribe
 134
 135 " Listed for removal
 136 syn keyword slrnrcFunGroup      contained down group_bob group_eob pagedown pageup toggle_group_display uncatch_up up
 137
 138 " Functions in readline mode (actually from slang's slrline.c)
 139 syn keyword slrnrcFunRead       contained bdel bol complete cycle del delbol delbow deleol down enter eol left quoted_insert right self_insert trim up
 140
 141 " Binding keys
 142 syn keyword slrnrcSetkeyObj     contained article group readline
 143 syn region  slrnrcSetkeyObjStr  contained matchgroup=slrnrcSetkeyObj start=+"+ end=+"+ oneline contains=slrnrcSetkeyObj
 144 syn match   slrnrcSetkeyArt     contained '\("\=\)\<article\>\1\s\+\S\+' skipwhite nextgroup=slrnrcKey contains=slrnrcSetKeyObj\(Str\)\=,slrnrcFunArt
 145 syn match   slrnrcSetkeyGroup   contained '\("\=\)\<group\>\1\s\+\S\+' skipwhite nextgroup=slrnrcKey contains=slrnrcSetKeyObj\(Str\)\=,slrnrcFunGroup
 146 syn match   slrnrcSetkeyRead    contained '\("\=\)\<readline\>\1\s\+\S\+' skipwhite nextgroup=slrnrcKey contains=slrnrcSetKeyObj\(Str\)\=,slrnrcFunRead
 147 syn match   slrnrcSetkey        "^\s*setkey\>" skipwhite nextgroup=slrnrcSetkeyArt,slrnrcSetkeyGroup,slrnrcSetkeyRead
 148
 149 " Unbinding keys
 150 syn match   slrnrcUnsetkey      '^\s*unsetkey\s\+\("\)\=\(article\|group\|readline\)\>\1' skipwhite nextgroup=slrnrcKey contains=slrnrcSetkeyObj\(Str\)\=
 151
 152 " Define the default highlighting.
 153 " For version 5.7 and earlier: only when not done already
 154 " For version 5.8 and later: only when an item doesn't have highlighting yet
 155 if version >= 508 || !exists("did_slrnrc_syntax_inits")
 156   if version < 508
 157     let did_slrnrc_syntax_inits = 1
 158     command -nargs=+ HiLink hi link <args>
 159   else
 160     command -nargs=+ HiLink hi def link <args>
 161   endif
 162
 163   HiLink slrnrcTodo             Todo
 164   HiLink slrnrcSpaceError       Error
 165   HiLink slrnrcNumber           Number
 166   HiLink slrnrcSpecKey          SpecialChar
 167   HiLink slrnrcKey              String
 168   HiLink slrnrcSpecChar         SpecialChar
 169   HiLink slrnrcString           String
 170   HiLink slrnSlangPreCondit     Special
 171   HiLink slrnrcComment          Comment
 172   HiLink slrnrcVarInt           Identifier
 173   HiLink slrnrcVarStr           Identifier
 174   HiLink slrnrcCmd              slrnrcSet
 175   HiLink slrnrcSet              Operator
 176   HiLink slrnrcColor            Keyword
 177   HiLink slrnrcColorObj         Identifier
 178   HiLink slrnrcColorVal         String
 179   HiLink slrnrcMono             Keyword
 180   HiLink slrnrcMonoObj          Identifier
 181   HiLink slrnrcMonoVal          String
 182   HiLink slrnrcFunArt           Macro
 183   HiLink slrnrcFunGroup         Macro
 184   HiLink slrnrcFunRead          Macro
 185   HiLink slrnrcSetkeyObj        Identifier
 186   HiLink slrnrcSetkey           Keyword
 187   HiLink slrnrcUnsetkey         slrnrcSetkey
 188
 189   delcommand HiLink
 190 endif
 191
 192 let b:current_syntax = "slrnrc"
 193
 194 "EOF    vim: ts=8 noet tw=120 sw=8 sts=0