File: insert-header.sin

package info (click to toggle)
orpheus 1.5-5
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 1,780 kB
  • ctags: 1,731
  • sloc: cpp: 8,265; sh: 6,351; ansic: 5,513; makefile: 356; yacc: 316; sed: 16
file content (23 lines) | stat: -rw-r--r-- 672 bytes parent folder | download | duplicates (3956) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
# 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
}