Edit file File name : chglog.slc Content :.#��! 3 2 ChangeLog_Filename�! 7 ) ChangeLog��! 3 / custom_variable��" 11 . ChangeLog_User��" 12 ( %s <%s> , get_realname 0 get_emailaddress� ' sprintf��" 11 / custom_variable��" 13 7 ChangeLog_Indent_Amount! 8� / custom_variable,*�" 17 " tm # day % mo nth $ year+��" 18 % _time� ) localtime�" tm��" 20 * %d-%0d-%0d$ 1900 " tm"' tm_year9! 1 " tm"& tm_mon9 " tm"' tm_mday� ' sprintf�" 15�2 get_changelog_date,*�" 25 $ date+ 2 get_changelog_date�$ date��" 27 & %s %s $ date . ChangeLog_User� ' sprintfw�" 2 3�8 format_changelog_heading,*�" 32 $ file # dir+�" 34 + getbuf_infoPP�# dirP.��" 38 # dir 2 ChangeLog_Filename� & dircat�$ file�" 39! 1� $ file� + file_statusA.�" 40 $ filew/c���" 44 # dir # ../� & dircat� / expand_filename�# dir�" 45 # dir ! /A.v/c/e ��" 62 ? Unable to find a ChangeLog file� & verror�" 30�5 locate_changelog_file,*�" 67 # dir $ file+�" 69 + getbuf_infoPP�# dir�$ file��" 70 $ file� & strlen.�" 71 w/b�" 72 $ file 2 ChangeLog_FilenameA.�" 73 w/c��" 75 # dir $ file� & dircatw�" 65�7 g et_changelog_file_item,*�" 80 # fun+� / chglog_get_item� 2 mode_get_mode_info�# fun�" 81 # fun $ NULLB.�" 82 # funM�# fun/c�" 83 # fun $ NULLA.�" 84 w/c�" 85 # funw�" 78�6 get_changelog_function,�" 90 ) push_spot�" 91 ( bol_trim� 7 ChangeLog_Indent_Am ount! 29� * whitespace�" 92 ( pop_spot�" 88�) wrap_hook,*�" 97 ' heading+ 8 format_changelog_heading�' heading*�" 98 $ file+ 7 get_changelog_file_item�$ file*�" 99 ( function+ 6 get_changelog_function�( function*�# 100 ) changelog+ 5 locate_changelog_fi le�) changelog��# 102 $ file� & strlen.*�# 105 ! i+! 0�! i.��# 106 ! i ) changelog!� ! i $ file!A/.�# 107�! i/f���# 108 ! i�� $ file!�$ file/c��# 111 ) changelog� ) read_fileP�# 112 4 set_buffer_no_backup��# 113 ' whatbuf� ' pop2buf�# 114 ) text_mode��# 116 ) wrap_hook}) wrap_hook� / set_buffer_hook�# 118 # bob��# 119 ' heading� + bol_fsearch.��# 121$& %s\n\n ' heading� ' vinsert�# 122 # bob/b�# 124 # eol*�# 125 ! m+ 0 create_user_mark�! m��# 127$% \n*� * skip_chars*�# 129 0 create_new_entry+! 1�0 cr eate_new_entry��# 131 $ file� * looking_at.���# 133 $ file� & strlen� ( go_right�# 134 * _get_point��# 135 " :� * skip_chars�# 136 * _get_pointA�0 create_new_entry/c�# 139 0 create_new_entry.��# 141 ! m� . goto_user_mark��# 142$$ \n\n� & insert��# 143 7 ChangeLog_Indent_Amount� * whitespace��# 144 % * %s $ file� ' vinsert/.��# 148 ' ^[ ]*$� * re_fsearch.�# 150 # eob/b�# 152 $ trim�# 153 ' newline�# 154 ' go_up_1��# 155! 8� * whitespace/d��# 158 ( function� & strlen.��# 159 & (%s): ( function� ' vinse rt/.�# 160 0 create_new_entry� $ file� & strlenC.�# 162 $ trim��# 163 " : � & insert/c/d�" 95�4 changelog_add_change Save