<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN""http://www.w3.org/TR/html4/loose.dtd"> <HTML ><HEAD ><TITLE >url-encode-char</TITLE ><META NAME="GENERATOR" CONTENT="Modular DocBook HTML Stylesheet Version 1.79"><LINK REL="HOME" TITLE="DSSSL Library Reference" HREF="index.html"><LINK REL="UP" TITLE="Miscellaneous" HREF="r300.htm"><LINK REL="PREVIOUS" TITLE="include-characters" HREF="include-characters.html"><LINK REL="NEXT" TITLE="url-encode-string" HREF="url-encode-string.html"></HEAD ><BODY CLASS="REFENTRY" BGCOLOR="#FFFFFF" TEXT="#000000" LINK="#0000FF" VLINK="#840084" ALINK="#0000FF" ><DIV CLASS="NAVHEADER" ><TABLE SUMMARY="Header navigation table" WIDTH="100%" BORDER="0" CELLPADDING="0" CELLSPACING="0" ><TR ><TH COLSPAN="3" ALIGN="center" >DSSSL Library Reference: Part of the Modular DocBook Stylesheet distribution</TH ></TR ><TR ><TD WIDTH="10%" ALIGN="left" VALIGN="bottom" ><A HREF="include-characters.html" ACCESSKEY="P" >Prev</A ></TD ><TD WIDTH="80%" ALIGN="center" VALIGN="bottom" ></TD ><TD WIDTH="10%" ALIGN="right" VALIGN="bottom" ><A HREF="url-encode-string.html" ACCESSKEY="N" >Next</A ></TD ></TR ></TABLE ><HR ALIGN="LEFT" WIDTH="100%"></DIV ><H1 ><A NAME="URL-ENCODE-CHAR" ></A >url-encode-char</H1 ><DIV CLASS="REFNAMEDIV" ><A NAME="AEN1906" ></A ><H2 >Name</H2 >url-encode-char -- Returns the url-encoded equivalent of a character</DIV ><DIV CLASS="REFSYNOPSISDIV" ><A NAME="AEN1909" ></A ><H2 >Synopsis</H2 ><PRE CLASS="SYNOPSIS" >(url-encode-char ch)</PRE ></DIV ><DIV CLASS="REFSECT1" ><A NAME="AEN1912" ></A ><H2 >Description</H2 ><P >Converts <TT CLASS="LITERAL" >ch</TT > to a properly encoded URL character.</P ></DIV ><DIV CLASS="REFSECT1" ><A NAME="AEN1916" ></A ><H2 >Author</H2 ><P >Norman Walsh, <ndw@nwalsh.com></P ></DIV ><DIV CLASS="REFSECT1" ><A NAME="AEN1919" ></A ><H2 >Source Code</H2 ><PRE CLASS="PROGRAMLISTING" >(define (url-encode-char ch) ;; Returns the url-encoded equivalent of a character (cond ((char=? ch #\space) "%20") ; space ((char=? ch #\U-0026) "%26") ; ampersand ((char=? ch #\?) "%3F") ; question ((char=? ch #\{) "%7B") ; open curly ((char=? ch #\}) "%7D") ; close curly ((char=? ch #\|) "%7C") ; vertical bar ((char=? ch #\\) "%5C") ; backslash ((char=? ch #\/) "%2F") ; slash ((char=? ch #\^) "%5E") ; caret ((char=? ch #\~) "%7E") ; tilde ((char=? ch #\[) "%5B") ; open square ((char=? ch #\]) "%5D") ; close square ((char=? ch #\`) "%60") ; backtick ((char=? ch #\%) "%25") ; percent ((char=? ch #\+) "%2B") ; plus (else (string ch))))</PRE ></DIV ><DIV CLASS="NAVFOOTER" ><HR ALIGN="LEFT" WIDTH="100%"><TABLE SUMMARY="Footer navigation table" WIDTH="100%" BORDER="0" CELLPADDING="0" CELLSPACING="0" ><TR ><TD WIDTH="33%" ALIGN="left" VALIGN="top" ><A HREF="include-characters.html" ACCESSKEY="P" >Prev</A ></TD ><TD WIDTH="34%" ALIGN="center" VALIGN="top" ><A HREF="index.html" ACCESSKEY="H" >Home</A ></TD ><TD WIDTH="33%" ALIGN="right" VALIGN="top" ><A HREF="url-encode-string.html" ACCESSKEY="N" >Next</A ></TD ></TR ><TR ><TD WIDTH="33%" ALIGN="left" VALIGN="top" >include-characters</TD ><TD WIDTH="34%" ALIGN="center" VALIGN="top" ><A HREF="r300.htm" ACCESSKEY="U" >Up</A ></TD ><TD WIDTH="33%" ALIGN="right" VALIGN="top" >url-encode-string</TD ></TR ></TABLE ></DIV ></BODY ></HTML >