文件操作 - lang_texinfo.st
返回文件管理
返回主菜单
删除本文件
文件: /usr/share/enscript/hl/lang_texinfo.st
编辑文件内容
state lang_texinfo { BEGIN { /* Nop since Texinfo doesn't have colors. */ sub map_color (r, g, b) { return ""; } LANGUAGE_SPECIALS = /[{}@]/; sub language_print (str) { str = regsuball (str, /@/, "@@"); str = regsuball (str, /{/, "@{"); str = regsuball (str, /}/, "@}"); print (str); } sub language_symbol (symbol) { return false; } sub header () { print ("@example\n"); } sub trailer () { print ("@end example\n"); } sub face_on (face) { if (face[boldp]) print ("@strong{"); if (face[italicp]) print ("@emph{"); } sub face_off (face) { if (face[italicp]) print ("}"); if (face[boldp]) print ("}"); } return; } } /* Local variables: mode: c End: */
修改文件时间
将文件时间修改为当前时间的前一年
删除文件