1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
/******************************************************************************
* $Id: plmodule.i 5206 2006-02-17 04:28:05Z sdlime $
*
* Project: MapServer
* Purpose: Perl-specific enhancements to MapScript
* Author: SDL based on Sean's Python conventions
*
******************************************************************************
*
* Perl-specific mapscript code has been moved into this
* SWIG interface file to improve the readibility of the main
* interface file. The main mapscript.i file includes this
* file when SWIGPERL is defined (via 'swig -perl5 ...').
*
*****************************************************************************/
/******************************************************************************
* Simple Typemaps
*****************************************************************************/
%init %{
if(msSetup() != MS_SUCCESS) {
msSetError(MS_MISCERR, "Error initializing MapServer/Mapscript.", "msSetup()");
}
%}
|
