From 17f379bd9fa6fc749c99a0a44bb590b68ae1c4df Mon Sep 17 00:00:00 2001
From: root <>
Date: Sun, 8 Feb 2009 19:05:52 +0000
Subject: *** empty log message ***

---
 Makefile.am |  5 ++++-
 app/jwg.f   | 22 ++++++++++++++++++++++
 test/ex1.f  |  4 ++--
 3 files changed, 28 insertions(+), 3 deletions(-)
 create mode 100644 app/jwg.f

diff --git a/Makefile.am b/Makefile.am
index 9586cf3..c161e0f 100644
--- a/Makefile.am
+++ b/Makefile.am
@@ -8,6 +8,9 @@
 # $Id$
 #
 # $Log$
+# Revision 1.3  2009/02/08 19:05:52  root
+# *** empty log message ***
+#
 # Revision 1.2  2009/02/08 16:56:26  root
 # *** empty log message ***
 #
@@ -20,7 +23,7 @@ EXTRA_DIST= version-major version-minor version-micro version-files version-md5s
 
 bin_SCRIPTS = libjwg-config
 
-pkgconfigdir=${LIBDIR}/pkgconfig
+pkgconfigdir=${libdir}/pkgconfig
 pkgconfig_DATA= libjwg.pc
 
 libjwg.pc.src:libjwg.pc.src.in
diff --git a/app/jwg.f b/app/jwg.f
new file mode 100644
index 0000000..03fabb7
--- /dev/null
+++ b/app/jwg.f
@@ -0,0 +1,22 @@
+C
+C        jwg.f
+C
+C        Copyright (c) 2009 James McKenzie <20@madingley.org>,
+C        All rights reserved.
+C
+         subroutine RCSJWGF
+         character*100 rcsid
+         data rcsid/
+     +   "$Id$"
+     +   /
+         end subroutine
+C	
+C        $Log$
+C        Revision 1.1  2009/02/08 19:02:42  root
+C        *** empty log message ***
+C
+C
+
+         PROGRAM jwg
+
+         END
diff --git a/test/ex1.f b/test/ex1.f
index 0eafc8d..ff761eb 100644
--- a/test/ex1.f
+++ b/test/ex1.f
@@ -326,7 +326,7 @@ C	and a slash across the middle
 
 C 	check scaling
 
-	call jwg_add_xform(ihandle,0.0,0.0,10.0,0,0,10.0)
+	call jwg_add_xform(ihandle,0.0,0.0,10.0,0.0,0.0,10.0)
 
 	widthmy=10.0
 	call jwg_set_pen(ihandle,red,green,blue,widthmy)
@@ -340,7 +340,7 @@ C	check text
 	call jwg_set_textheight(ihandle,10.0)
 	call jwg_draw_text(ihandle,30.0,0.0,"MOOCOW  ")
 
-	call jwg_add_xform(ihandle,0.0,0.0,0.1,0,0,0.1)
+	call jwg_add_xform(ihandle,0.0,0.0,0.1,0.0,0.0,0.1)
 
 	call jwg_set_textcolor(ihandle,0.0,0.0,0.0)
 C	call jwg_set_textheight(ihandle,100.0)
-- 
cgit v1.2.3