Changeset 9c72c3b


Ignore:
Timestamp:
Jul 21, 2010, 11:00:44 PM (14 years ago)
Author:
Jessica B. Hamrick <jhamrick@…>
Branches:
web
Parents:
f6f3e91
git-author:
Jessica B. Hamrick <jhamrick@…> (07/21/10 23:00:44)
git-committer:
Jessica B. Hamrick <jhamrick@…> (07/21/10 23:00:44)
Message:

Update the web interface to run locally, at least; add a TODO

Location:
web
Files:
4 added
1 moved

Legend:

Unmodified
Added
Removed
  • web/www/cgi-bin/gutenbach-web.pl

    r30beeab r9c72c3b  
     1#!/bin/perl
     2
    13use Net::CUPS;
    24use Net::CUPS::Destination;
     
    810
    911my $cups = Net::CUPS->new();
    10 
    11 my $printer = $cups->getDestination("buildsmp3");
     12$cups->setServer("lbsg.mit.edu");
     13my $printer = $cups->getDestination("pikamp3");
    1214#print header();
    1315print start_html();
     
    1719my $attr;
    1820print  <<EOF;
    19 <TABLE SUMMARY="Job List">
     21<TABLE SUMMARY="Job List" cellpadding="5px">
    2022<THEAD>
    2123<TR><TH> USER</TH><TH>TITLE</TH><TH>ARTIST</TH><TH>ALBUM</TH></TR>
Note: See TracChangeset for help on using the changeset viewer.