X-Git-Url: http://git.madism.org/?a=blobdiff_plain;f=contrib%2Fupdate-config.pl;fp=contrib%2Fupdate-config.pl;h=0000000000000000000000000000000000000000;hb=6d4e89a8e0a0d6639c04b8ac0ca808b1dba23c3d;hp=8d5a4b3675db1e09cbe8805139ef8e8beba44cc1;hpb=ffd9bdb72850419ba4131009524787d616f785bb;p=apps%2Fmadmutt.git diff --git a/contrib/update-config.pl b/contrib/update-config.pl deleted file mode 100755 index 8d5a4b3..0000000 --- a/contrib/update-config.pl +++ /dev/null @@ -1,77 +0,0 @@ -#!/usr/bin/perl -w - -# purpose: -# update var names for mutt-ng -# update: -# grep ', DT_SYN' init.h | awk -F , '{print $1 $4}' | sed -e 's/[{UL]//g' -e 's/" "/" => "/g' - -use strict; - -my %opts = ( - # removed on 2005-06-16 - " edit_hdrs" => " edit_headers", - " forw_decode" => " forward_decode", - " forw_format" => " forward_format", - " forw_quote" => " forward_quote", - " hdr_format" => " index_format", - " indent_str" => " indent_string", - " mime_fwd" => " mime_forward", - " msg_format" => " message_format", - " pgp_autosign" => " crypt_autosign", - " pgp_autoencrypt" => " crypt_autoencrypt", - " pgp_replyencrypt" => " crypt_replyencrypt", - " pgp_replysign" => " crypt_replysign", - " pgp_replysignencrypted" => " crypt_replysignencrypted", - " pgp_verify_sig" => " crypt_verify_sig", - " pgp_create_traditional" => " pgp_autoinline", - " pgp_auto_traditional" => " pgp_replyinline", - " forw_decrypt" => " forward_decrypt", - " smime_sign_as" => " smime_default_key", - " post_indent_str" => " post_indent_string", - " print_cmd" => " print_command", - " shorten_hierarchy" => " sidebar_shorten_hierarchy", - # removed on 2005-08-29 - " ask_followup_to" => " nntp_ask_followup_to", - " ask_x_comment_to" => " nntp_ask_x_comment_to", - " catchup_newsgroup" => " nntp_catchup", - " followup_to_poster" => " nntp_followup_to_poster", - " group_index_format" => " nntp_group_index_format", - " inews" => " nntp_inews", - " mime_subject" => " nntp_mime_subject", - " news_cache_dir" => " nntp_cache_dir", - " news_server" => " nntp_host", - " newsrc" => " nntp_newsrc", - " nntp_poll" => " nntp_mail_check", - " pop_checkinterval" => " pop_mail_check", - " post_moderated" => " nntp_post_moderated", - " save_unsubscribed" => " nntp_save_unsubscribed", - " show_new_news" => " nntp_show_new_news", - " show_only_unread" => " nntp_show_only_unread", - " x_comment_to" => " nntp_x_comment_to", - # renamed for consistency w/ libesmtp - " smtp_auth_username" => " smtp_user", - " smtp_auth_password" => " smtp_pass", - # renamed to free $user_ namespace - " user_agent" => " agent_string" -); - -if (@ARGV == 0) { - die "Usage: $0 \n"; -} - -foreach my $f (@ARGV) { - if (open (INPUT, "<" . $f)) { - my @l = (); - while () { - foreach my $v (keys %opts) { - $_ =~ s/($v)/$opts{$1}/; - } - push (@l, $_); - } - close (INPUT); - if (open (OUTPUT, ">" . $f)) { - print OUTPUT @l; - close (OUTPUT); - } - } -}