|
Lines 106-116
SKIP:
Link Here
|
| 106 |
cmp_deeply ($quote, $expected_quote, "Got a quote based on id.") or |
106 |
cmp_deeply ($quote, $expected_quote, "Got a quote based on id.") or |
| 107 |
diag('Be sure to run this test on a clean install of sample data.'); |
107 |
diag('Be sure to run this test on a clean install of sample data.'); |
| 108 |
|
108 |
|
| 109 |
# test random quote retrieval |
|
|
| 110 |
|
| 111 |
$quote = GetDailyQuote('random'=>1); |
| 112 |
ok ($quote, "Got a random quote."); |
| 113 |
|
| 114 |
# test quote retrieval based on today's date |
109 |
# test quote retrieval based on today's date |
| 115 |
|
110 |
|
| 116 |
my $query = 'UPDATE quotes SET timestamp = ? WHERE id = ?'; |
111 |
my $query = 'UPDATE quotes SET timestamp = ? WHERE id = ?'; |
|
Lines 125-130
SKIP:
Link Here
|
| 125 |
$quote = GetDailyQuote(); # this is the "default" mode of selection |
120 |
$quote = GetDailyQuote(); # this is the "default" mode of selection |
| 126 |
cmp_deeply ($quote, $expected_quote, "Got a quote based on today's date.") or |
121 |
cmp_deeply ($quote, $expected_quote, "Got a quote based on today's date.") or |
| 127 |
diag('Be sure to run this test on a clean install of sample data.'); |
122 |
diag('Be sure to run this test on a clean install of sample data.'); |
|
|
123 |
|
| 124 |
# test random quote retrieval |
| 125 |
|
| 126 |
$quote = GetDailyQuote('random'=>1); |
| 127 |
ok ($quote, "Got a random quote."); |
| 128 |
} |
128 |
} |
| 129 |
}; |
129 |
}; |
| 130 |
} |
130 |
} |
| 131 |
- |
|
|