ACC SHELL

/**
 * File:	boot_vmlinuz_version.scr
 * Summary:	Agent for reading /etc/exports
 * Authors:	Klaus Kaempf <kkaempf@suse.de>
 * Access:	read/write
 *
 * Example:
 *   Read(.boot.vmlinuz_version, "/boot/vmlinuz")
 *   ("2.2.18")
 *
 * $Id: boot_vmlinuz_version.scr 13069 2003-12-16 09:30:51Z jsrain $
 *
 * Returns the version of the kernel image given as the second argument
 */
.boot.vmlinuz_version

`ag_anyagent(
    `Description(
	(`Run("/sbin/get_kernel_version ", `arg(0))),
	"\n", true,
	(`String("^\n"))
    )
)