Mercurial > audlegacy
view po/insert-header.sin @ 2304:b0e49d195c64 trunk
[svn] Fuck, I forgot to quote the $ in the commit msg, so my home was in the ChangeLog.
author | js |
---|---|
date | Tue, 09 Jan 2007 14:53:19 -0800 |
parents | cb178e5ad177 |
children |
line wrap: on
line source
# Sed script that inserts the file called HEADER before the header entry. # # At each occurrence of a line starting with "msgid ", we execute the following # commands. At the first occurrence, insert the file. At the following # occurrences, do nothing. The distinction between the first and the following # occurrences is achieved by looking at the hold space. /^msgid /{ x # Test if the hold space is empty. s/m/m/ ta # Yes it was empty. First occurrence. Read the file. r HEADER # Output the file's contents by reading the next line. But don't lose the # current line while doing this. g N bb :a # The hold space was nonempty. Following occurrences. Do nothing. x :b }