ACC SHELL

# Style sheet for producing reference card out `--help' outputs
#
# Copyright (c) 1988, 89, 90, 91, 92, 93 Miguel Santana
# Copyright (c) 1995, 96, 97, 98 Akim Demaille, Miguel Santana
# $Id: card.ssh,v 1.6 1998/03/11 20:29:57 demaille Exp $
#

#
# This file is part of a2ps.
# 
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2, or (at your option)
# any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; see the file COPYING.  If not, write to
# the Free Software Foundation, 59 Temple Place - Suite 330,
# Boston, MA 02111-1307, USA.
#

style "Reference Card" is

written by "Akim Demaille <akim@freefriends.org>"
version is 1.1
requires a2ps version 4.13

documentation is
  "This style sheet is meant to process help messages generated by"
  "Unix applications.  It highlights the options (-short or --long),"
  "and their arguments."
  "Normal use of this style sheet is through the shell script card"
  "(part of the a2ps package), but a typical hand-driven use is:"
  "@example"
  "program --help | a2ps -Ecard"
  "@end example"
end documentation

alphabets are
   "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz\\_-/é"
case sensitive

# Exceptions
keywords in Plain are
  "GNU", "GDB"
end keywords

operators in Keyword_strong are
  # Sections are lines (i) ended by `:', (ii) with no punctation
  # And (iii) not starting with a blank
  # Add a line so that it gets easier to read
  (/^([^[:blank:]:][^:,.]*):[[:blank:]]*$/ "\n", \1 Label),

  # Highlight the options
  # Short that may remain
  /-[[:graph:]]/,

  # Long options
  /--?[^\t =,<([]+/,

  # Words (at least 2 chars) in upper case are supposed to be arguments
  /[[:upper:]]{2,}\\b/ Keyword,

  # Idem with <words>
  /<[^>]+>/ Keyword
end operators

sequences are
  "card_label(" Invisible Label_strong ")" Invisible,
  "card_title(" Invisible (Invisible + Tag1) ")" Invisible,
  "card_footer(" Invisible (Invisible + Tag2) ")" Invisible
end sequences

end style # Card